
Time bar (total: 15.0s)
| 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)
| 953.0ms | 2 899× | 1 | valid |
| 590.0ms | 5 288× | 0 | valid |
| 48.0ms | 69× | 2 | valid |
ival-mult!: 278.0ms (21.3% of total)ival-hypot: 248.0ms (19% of total)ival-sin: 206.0ms (15.8% of total)ival-log: 204.0ms (15.7% of total)adjust: 117.0ms (9% of total)ival-atan2: 113.0ms (8.7% of total)ival-exp: 83.0ms (6.4% of total)ival-sub!: 28.0ms (2.2% of total)ival-add!: 26.0ms (2% of total)| Ground Truth | Overpredictions | Example | Underpredictions | Example | Subexpression |
|---|---|---|---|---|---|
| 189 | 0 | - | 1 | (-1.9462724060944152e-202 4.4259234772532087e+58 2.8374351481302546e-226 -0.4689267997325419) | (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))) |
| 138 | 0 | - | 2 | (-2.4426086459058754e-248 -1.731094546785439e-156 1.1200186316237965e+250 1.280197765512798e+292) | (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
| 6 | 0 | - | 0 | - | (*.f64 (atan2.f64 x.im x.re) y.re) |
| 5 | 0 | - | 0 | - | (*.f64 (atan2.f64 x.im x.re) y.im) |
| 1 | 0 | - | 0 | - | (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 | 186 | 1 |
sqrt.f64 | (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) | oflow-rescue | 118 | 0 |
| ↳ | (*.f64 x.re x.re) | overflow | 70 | |
| ↳ | (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) | overflow | 118 | |
| ↳ | (*.f64 x.im x.im) | overflow | 73 | |
sqrt.f64 | (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) | uflow-rescue | 3 | 0 |
| ↳ | (*.f64 x.re x.re) | underflow | 67 | |
| ↳ | (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) | underflow | 18 | |
| ↳ | (*.f64 x.im x.im) | underflow | 54 | |
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))) | oflow-rescue | 2 | 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)) | overflow | 2 | |
| ↳ | (*.f64 x.re x.re) | overflow | 70 | |
| ↳ | (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) | overflow | 118 | |
| ↳ | (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) | overflow | 2 | |
| ↳ | (*.f64 x.im x.im) | overflow | 73 | |
exp.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))) | sensitivity | 1 | 0 |
*.f64 | (*.f64 (atan2.f64 x.im x.re) y.im) | n*u | 1 | 0 |
| Predicted + | Predicted - | |
|---|---|---|
| + | 155 | 5 |
| - | 71 | 25 |
| Predicted + | Predicted Maybe | Predicted - | |
|---|---|---|---|
| + | 155 | 1 | 4 |
| - | 71 | 0 | 25 |
| number | freq |
|---|---|
| 0 | 30 |
| 1 | 141 |
| 2 | 85 |
| Predicted + | Predicted Maybe | Predicted - | |
|---|---|---|---|
| + | 1 | 0 | 0 |
| - | 0 | 0 | 0 |
| 139.0ms | 366× | 1 | valid |
| 19.0ms | 138× | 0 | valid |
| 6.0ms | 8× | 2 | valid |
Compiled 393 to 61 computations (84.5% saved)
ival-mult!: 30.0ms (23.2% of total)ival-sin: 24.0ms (18.5% of total)ival-hypot: 19.0ms (14.7% of total)ival-log: 18.0ms (13.9% of total)adjust: 16.0ms (12.3% of total)ival-atan2: 12.0ms (9.3% of total)ival-exp: 5.0ms (3.9% of total)ival-add!: 4.0ms (3.1% of total)ival-sub!: 2.0ms (1.5% of total)Useful iterations: 3 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 141 | 575 |
| 1 | 390 | 556 |
| 2 | 1085 | 552 |
| 3 | 2819 | 550 |
| 1× | node-limit |
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 38.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)))) |
Compiled 74 to 38 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 | |
|---|---|---|---|---|
| 49.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)) |
| 17.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)) |
| 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)) |
| 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)) |
| 11.0ms | y.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)
15 alts after pruning (15 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 440 | 15 | 455 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 0 | 1 |
| Done | 0 | 0 | 0 |
| Total | 441 | 15 | 456 |
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 70.1% | (*.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)))) |
| 33.7% | (*.f64 (exp.f64 (/.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)))) (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)))) | |
| 32.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 (*.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))))) | |
| 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)))) | |
| 33.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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| ▶ | 29.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 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 34.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 #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))))) | |
| 56.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 #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))))) | |
| ▶ | 13.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))) #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)))))) |
| 26.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))) #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))))))))) | |
| 44.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) (*.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.7% | (*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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)))))) |
| 25.3% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) | |
| 26.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.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)))))) | |
| ▶ | 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)))) (*.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 1 914 to 972 computations (49.2% 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)) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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)))))) |
(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 (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))))) |
(-.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)))) |
(sin.f64 (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)) |
#s(literal 1/2 binary64) |
(*.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))) |
(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)) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.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))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(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))) #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 #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))))) |
(-.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)))) |
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) |
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) |
(log.f64 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(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)) |
(*.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 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(cos.f64 (fma.f64 y.im (log.f64 x.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 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(sin.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 #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)))) y.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)))) |
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) |
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)) |
(/.f64 #s(literal -1 binary64) x.im) |
#s(literal -1 binary64) |
| 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 (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 (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.im y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))))))))) (* -1 (* y.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)))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (* y.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))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1 (* y.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)))) (* -1 (* (pow x.re 2) (* y.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)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (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)))) (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (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)))) (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)))))) (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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (/ (- (* (pow x.re 2) (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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) |
#s(approx (log x.re) #s(hole binary64 (log x.re))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -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 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (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 (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* 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) #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 (* (/ (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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im 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))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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)))))) (pow x.re 2))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (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 (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -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) #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)) (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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im 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))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re)))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (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) #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)) (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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.re y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))))))))) (* -1 (* y.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)))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (* y.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))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1 (* y.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)))) (* -1 (* (pow x.im 2) (* y.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)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im 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)))) (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im 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)))) (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)))))) (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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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 (* (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 (pow (/ -1 x.im) -1)) #s(hole binary64 (+ (log -1) (log x.im)))) |
#s(approx (pow (/ -1 x.im) -1) #s(hole binary64 (* -1 x.im))) |
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im))) |
#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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (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))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (- (/ (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))))))) |
#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 (pow (/ -1 x.im) -1)) #s(hole binary64 (+ (log -1) (* -1 (log (/ 1 x.im)))))) |
#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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (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))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (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 (* (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 (pow (/ -1 x.im) -1)) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))) |
#s(approx (neg y.re) #s(hole binary64 (* -1 y.re))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (sin (* y.im (log x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (* (cos (* y.im (log x.re))) (atan2 x.im x.re)) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (+ (* y.re (- (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (* -1/12 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* y.re (+ (* 1/4 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* y.re (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* y.re (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2)))))))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* -1/2 (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (* 1/6 (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (* y.im (log x.re)))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* y.im (cos (* y.im (log x.re))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (cos (* y.im (log x.re)))) (* y.re (+ (* -1 (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (cos (* y.im (log x.re)))) (* y.re (+ (* -1 (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (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 (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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow 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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (- (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re) (* -1 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* 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 (* 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 (- (* (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re)) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (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.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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.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 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* 1/2 (* y.re (* (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))) (atan2 x.im x.re)) #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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (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))) (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)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (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))) #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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re 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.re)) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (+ (* y.im (- (* -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))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* 1/4 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2)))))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* 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.re)) (* 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.re)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* 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.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* 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.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (+ (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (pow x.re 2))) (* 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 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (+ (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2))))))))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (pow x.re 2))))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (+ (* -1/2 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* 1/6 (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (* y.re (atan2 x.im x.re)))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))) |
#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) (* (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 (- (* (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow 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))) #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 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (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))) #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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* y.im (- (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im) (* -1/2 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* 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 (+ (* 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 (- (* (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 (+ (* 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.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im)) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
12 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 114.0ms | y.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)) (* (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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 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.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log 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)))) (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) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1) |
| 62.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)) (* (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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 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.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log 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)))) (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) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1) |
| 56.0ms | y.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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 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.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log 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)))) (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) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1) |
| 56.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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 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.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log 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)))) (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) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1) |
| 48.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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 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.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log 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)))) (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) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 4465 | 61934 |
| 0 | 4600 | 59822 |
| 0 | 9093 | 54941 |
| 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)) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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)))))) |
(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 (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))))) |
(-.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)))) |
(sin.f64 (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)) |
#s(literal 1/2 binary64) |
(*.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))) |
(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)) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.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))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(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))) #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 #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))))) |
(-.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)))) |
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) |
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) |
(log.f64 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(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)) |
(*.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 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(cos.f64 (fma.f64 y.im (log.f64 x.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 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(sin.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 #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)))) y.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)))) |
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) |
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)) |
(/.f64 #s(literal -1 binary64) x.im) |
#s(literal -1 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)))) #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 (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 (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.im y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))))))))) (* -1 (* y.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)))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (* y.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))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1 (* y.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)))) (* -1 (* (pow x.re 2) (* y.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)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (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)))) (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (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)))) (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)))))) (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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (/ (- (* (pow x.re 2) (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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) |
#s(approx (log x.re) #s(hole binary64 (log x.re))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -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 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (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 (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* 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) #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 (* (/ (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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im 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))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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)))))) (pow x.re 2))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (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 (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -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) #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)) (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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im 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))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re)))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (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) #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)) (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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.re y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))))))))) (* -1 (* y.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)))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (* y.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))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1 (* y.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)))) (* -1 (* (pow x.im 2) (* y.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)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im 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)))) (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im 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)))) (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)))))) (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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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 (* (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 (pow (/ -1 x.im) -1)) #s(hole binary64 (+ (log -1) (log x.im)))) |
#s(approx (pow (/ -1 x.im) -1) #s(hole binary64 (* -1 x.im))) |
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im))) |
#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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (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))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (- (/ (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))))))) |
#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 (pow (/ -1 x.im) -1)) #s(hole binary64 (+ (log -1) (* -1 (log (/ 1 x.im)))))) |
#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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (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))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (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 (* (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 (pow (/ -1 x.im) -1)) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))) |
#s(approx (neg y.re) #s(hole binary64 (* -1 y.re))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (sin (* y.im (log x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (* (cos (* y.im (log x.re))) (atan2 x.im x.re)) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (+ (* y.re (- (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (* -1/12 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* y.re (+ (* 1/4 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* y.re (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* y.re (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2)))))))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* -1/2 (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (* 1/6 (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (* y.im (log x.re)))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* y.im (cos (* y.im (log x.re))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (cos (* y.im (log x.re)))) (* y.re (+ (* -1 (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (cos (* y.im (log x.re)))) (* y.re (+ (* -1 (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (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 (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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow 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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (- (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re) (* -1 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* 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 (* 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 (- (* (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re)) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (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.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 (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.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 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* 1/2 (* y.re (* (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))) (atan2 x.im x.re)) #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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (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))) (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)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (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))) #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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re 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.re)) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (+ (* y.im (- (* -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))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* 1/4 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2)))))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* 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.re)) (* 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.re)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* 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.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* 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.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (+ (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (pow x.re 2))) (* 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 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (+ (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2))))))))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (pow x.re 2))))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (+ (* -1/2 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* 1/6 (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (* y.re (atan2 x.im x.re)))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))) |
#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) (* (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 (- (* (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow 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))) #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 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (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))) #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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* y.im (- (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im) (* -1/2 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* 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 (+ (* 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 (- (* (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 (+ (* 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.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im)) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
| Outputs |
|---|
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.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 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))) |
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))) |
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re) |
(pow.f64 (hypot.f64 x.re x.im) y.re) |
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) |
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.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)) |
(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) |
x.re |
x.im |
y.re |
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im) |
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) |
(+.f64 (cosh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) (sinh.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 |
(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)))) |
(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 (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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (neg.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (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)))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(pow.f64 (exp.f64 y.re) (log.f64 x.im)) |
(exp.f64 (*.f64 y.re (log.f64 x.im))) |
(+.f64 (cosh.f64 (*.f64 y.re (log.f64 x.im))) (sinh.f64 (*.f64 y.re (log.f64 x.im)))) |
(*.f64 y.re (log.f64 x.im)) |
(log.f64 (pow.f64 x.im y.re)) |
(log.f64 x.im) |
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(fma.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (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 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.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 (neg.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)) |
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.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) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) |
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))) |
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.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))) (fma.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))))) |
(-.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)) |
(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) |
(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))) |
(*.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))) |
#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 (+.f64 (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 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
(/.f64 (-.f64 (*.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))) (sin.f64 (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 (neg.f64 y.re) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.re) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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))) (*.f64 (neg.f64 y.re) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
(/.f64 (-.f64 (pow.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))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (fma.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))) (sin.f64 (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 (*.f64 (neg.f64 y.re) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.re) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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))) (*.f64 (neg.f64 y.re) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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))) (*.f64 (neg.f64 y.re) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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))) (*.f64 y.re (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(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 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) (/.f64 y.im #s(literal 2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) (/.f64 y.im #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.im) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.im #s(literal 2 binary64))) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.im)) |
(exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) y.im)) |
(*.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/4 binary64))) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) |
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64))) |
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (neg.f64 x.re)) |
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (fabs.f64 x.re)) |
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) x.re) |
(hypot.f64 (neg.f64 x.im) (pow.f64 x.re #s(literal 1 binary64))) |
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re)) |
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re)) |
(hypot.f64 (neg.f64 x.im) x.re) |
(hypot.f64 (fabs.f64 x.im) (pow.f64 x.re #s(literal 1 binary64))) |
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re)) |
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re)) |
(hypot.f64 (fabs.f64 x.im) x.re) |
(hypot.f64 x.im (pow.f64 x.re #s(literal 1 binary64))) |
(hypot.f64 x.im (neg.f64 x.re)) |
(hypot.f64 x.im (fabs.f64 x.re)) |
(hypot.f64 x.im x.re) |
(exp.f64 (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 x.re x.re)) |
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)) |
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
#s(literal 1/2 binary64) |
(*.f64 (neg.f64 y.re) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) |
(neg.f64 y.re) |
(*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) |
(fma.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))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(cos.f64 (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 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.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 (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 (PI.f64) #s(literal 2 binary64))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re 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 (PI.f64)) #s(literal -2 binary64)) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
#s(literal 2 binary64) |
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.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 (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) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im 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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))) |
(/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.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) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))) |
(/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (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)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.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) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.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) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.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) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))) |
(fma.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (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 (sin.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) |
(-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
(log.f64 x.re) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))) |
#s(literal -1/2 binary64) |
(*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)) |
(/.f64 (neg.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))))))) (neg.f64 (*.f64 x.re x.re))) |
(/.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)) |
(*.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 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(-.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (sin.f64 (fma.f64 #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)))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(fma.f64 (sin.f64 (*.f64 #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)))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 #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)))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(sin.f64 (fma.f64 #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)))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) |
(+.f64 (*.f64 (sin.f64 (*.f64 #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)))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 #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)))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(fma.f64 #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)))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) |
(-.f64 (*.f64 #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)))) y.im) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re)) |
(+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 #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)))) y.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)))) |
(*.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) |
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1/2 binary64))) |
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) x.im)) |
(exp.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (neg.f64 x.im)) |
(/.f64 #s(literal -1 binary64) x.im) |
#s(literal -1 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 (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)) (pow.f64 (exp.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 (*.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)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.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 (*.f64 x.im x.im) (pow.f64 (exp.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)) (pow.f64 (exp.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 (*.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)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.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 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im 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 (*.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))))) (pow.f64 x.im y.re))) (pow.f64 (exp.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)) (pow.f64 (exp.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 (*.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)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.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 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.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 (*.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))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.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 (*.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)))))) (pow.f64 x.im y.re)) (*.f64 (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))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im 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 (*.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))))) (pow.f64 x.im y.re))) (pow.f64 (exp.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)) (pow.f64 (exp.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) (pow.f64 (exp.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.re 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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (/.f64 (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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (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)))))) (pow.f64 x.im y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.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 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (pow.f64 x.im y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re 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 (*.f64 y.re y.re) (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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (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)))))) (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 (*.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 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.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 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.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) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.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 (*.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 (* (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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (* 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)) (pow.f64 (exp.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) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (pow.f64 (exp.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 (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (+ (* 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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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.im))))) (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 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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/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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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))))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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.im))))) (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 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.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))) (sin.f64 (*.f64 y.im (log.f64 x.im)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (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 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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/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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 x.im))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/720 binary64) (*.f64 (*.f64 x.re x.re) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (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 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 x.im y.im))) (*.f64 x.im x.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.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 (*.f64 y.im y.im) (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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))) (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 (*.f64 x.re x.re) x.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (-.f64 x.im (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.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.im x.im) (* x.re x.re)) (*.f64 x.im x.im)) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 x.im x.im (*.f64 x.re x.re))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.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 x.im x.im))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (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 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.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.im))))) (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 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (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 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.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.im))))) (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 #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 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (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))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.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))) (atan2 x.im x.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/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im 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)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (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 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/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 x.im x.im))) (*.f64 (*.f64 x.re 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.im))))) (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 #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))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (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 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/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 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -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 (*.f64 y.im y.im) (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 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (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 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))) (*.f64 x.im 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 (neg.f64 (*.f64 x.re x.re)) (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))))) (*.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 #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 (*.f64 y.im y.im) (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 (neg.f64 (*.f64 x.re x.re)) (+.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))))) (*.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 #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 (*.f64 y.im y.im) (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 (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 #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 (*.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 (+ (* 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 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.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 (*.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 (+ (* 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 (*.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 (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 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.im) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (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 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 (+ (* y.im (log x.re)) (* y.re (atan2 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (log x.re) (log.f64 x.re)) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.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))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (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) (*.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.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 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.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 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.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 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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 6 binary64)) (pow.f64 (exp.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 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (*.f64 y.re y.re)))) (pow.f64 (exp.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.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 (exp.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 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) 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)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 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) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.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) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 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 (*.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) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.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 #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 #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))) 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 (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 -1 binary64) (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 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.im x.im) y.im) (*.f64 x.re 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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (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.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.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)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (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 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) 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 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.im x.im) 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 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im 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)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))) |
#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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) 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)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re 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 (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.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)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.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)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 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 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#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 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#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 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re)) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.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))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.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))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (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))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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))))))))) (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))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re 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 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re 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 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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 (+ (* 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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) |
#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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))) |
#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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.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) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))))) (pow.f64 (exp.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 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))))) (pow.f64 (exp.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 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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 (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 (pow.f64 (exp.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 (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)))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.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 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.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 (pow.f64 (exp.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 (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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.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 (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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (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))))))))) (pow.f64 (exp.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 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (*.f64 y.re y.re)))) (pow.f64 (exp.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.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 (exp.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 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.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) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.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 (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)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.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) (*.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.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)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) 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)) (-.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 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 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 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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.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) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))) |
#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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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 (*.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) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) 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)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 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 (*.f64 x.im x.im) (*.f64 x.re 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) (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 (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 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 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 #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))) (atan2 x.im 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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re 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 #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))) (atan2 x.im x.re)) (+.f64 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (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) (PI.f64)))) (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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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))) (atan2 x.im 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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (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) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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))) (sin.f64 (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) (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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #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 (*.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64))) (/.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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (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) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.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) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.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 (*.f64 x.im x.im) y.im) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.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 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.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 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (log x.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) |
#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 (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)) (pow.f64 (exp.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 (*.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)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.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 (*.f64 x.re x.re) (pow.f64 (exp.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)) (pow.f64 (exp.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 (*.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)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.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 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re 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 (*.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))))) (pow.f64 x.re y.re))) (pow.f64 (exp.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)) (pow.f64 (exp.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 (*.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)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.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 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re 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 (*.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))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.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 (*.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)))))) (pow.f64 x.re y.re)) (*.f64 (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))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re 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 (*.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))))) (pow.f64 x.re y.re))) (pow.f64 (exp.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)) (pow.f64 (exp.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) (pow.f64 (exp.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.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 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.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 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (/.f64 (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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (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)))))) (pow.f64 x.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.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 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (pow.f64 x.re y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.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 (*.f64 y.re y.re) (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 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (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)))))) (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 (*.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 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.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 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.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) |
#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) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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) (+.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)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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 (* 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 (/ (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 y.re (log.f64 x.re))) (pow.f64 (exp.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 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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 (* x.im x.im) (*.f64 x.im x.im)) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 y.im y.im) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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/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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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))))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 y.im y.im) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 y.im (log.f64 x.re)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (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 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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/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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 x.re))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/720 binary64) (*.f64 (*.f64 x.im x.im) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (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 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 x.re y.im))) (*.f64 x.re x.re)) (pow.f64 x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.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 (*.f64 y.im y.im) (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 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))) (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 (*.f64 x.im x.im) x.re)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (-.f64 x.re (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.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 x.re x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.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 (*.f64 y.im y.im) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 y.im y.im) (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 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 x.re 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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (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 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/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 x.re x.re))) (*.f64 (*.f64 x.im 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.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 #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))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (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 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/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 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -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 (*.f64 y.im y.im) (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 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (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 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))) (*.f64 x.re 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 (neg.f64 (*.f64 x.im x.im)) (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))))) (*.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 #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 (*.f64 y.im y.im) (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 (neg.f64 (*.f64 x.im x.im)) (+.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))))) (*.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 #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 (*.f64 y.im y.im) (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 (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 #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 (*.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 (+ (* 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 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.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 (*.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 (+ (* 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 (*.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 (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 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.re) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))) |
#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 (log (pow (/ -1 x.im) -1)) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) |
#s(approx (pow (/ -1 x.im) -1) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (/ -1 x.im) (/.f64 #s(literal -1 binary64) 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.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 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.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 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.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 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 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 (*.f64 #s(literal -1 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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (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 -1 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 -1 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 6 binary64)) (pow.f64 (exp.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 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (*.f64 y.re y.re)))) (pow.f64 (exp.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.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 (exp.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 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) 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)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.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)) 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.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) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 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 -1 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 -1 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 -1 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 -1 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 -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 #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 #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 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 (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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 (* 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.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 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) |
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) |
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 -1 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 -1 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 (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))) |
#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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) 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)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.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)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.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)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 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 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#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 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#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 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.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))) (atan2 x.im x.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.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))) (atan2 x.im x.re)) (+.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (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))) (atan2 x.im x.re)) (+.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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))))))))) (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))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im 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 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.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 -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im 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 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.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 -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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 (+ (* 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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) |
#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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))) |
#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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.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 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.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)))))) |
#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 -1 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 -1 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 -1 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 -1 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 (log (pow (/ -1 x.im) -1)) (-.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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))))) (pow.f64 (exp.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 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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))))) (pow.f64 (exp.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 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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 (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 (pow.f64 (exp.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 (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)))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.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 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.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)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.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 (pow.f64 (exp.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 (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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.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 (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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (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))))))))) (pow.f64 (exp.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 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (*.f64 y.re y.re)))) (pow.f64 (exp.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.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 (exp.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 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.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) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.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 (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)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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) (*.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (* 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 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.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 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) |
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) |
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) |
#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)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.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)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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)) (-.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 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 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 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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.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) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))) |
#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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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 (*.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) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) 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)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 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 (*.f64 x.re x.re) (*.f64 x.im 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) (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 (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 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 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 #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))) (atan2 x.im x.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (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) (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))) (atan2 x.im x.re)) (+.f64 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (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) (PI.f64)))) (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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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))) (atan2 x.im x.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (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) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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))) (sin.f64 (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) (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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #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 (*.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64))) (/.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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (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) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.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) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (*.f64 x.re x.re) y.im) (*.f64 x.im 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (* (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 (log (pow (/ -1 x.im) -1)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 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 (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 (exp.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 (/.f64 (fma.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 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))) (sin.f64 (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 (exp.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 (exp.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 (sin.f64 (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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/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)))) (sin.f64 (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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.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)) (/.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))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 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))) (sin.f64 (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 (exp.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 (exp.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 (sin.f64 (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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/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)))) (sin.f64 (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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 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))) (*.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.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)) (/.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)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.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)) (/.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))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 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))) (sin.f64 (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 (exp.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 (exp.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))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.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)))) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (exp.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) |
#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 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (exp.f64 y.im) (atan2.f64 x.im x.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)))) (pow.f64 (exp.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) |
#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 (neg.f64 y.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)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.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)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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.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 (+.f64 (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 (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 (+.f64 (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 (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 (+.f64 (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 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.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)) (/.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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (+.f64 (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 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (pow.f64 (pow.f64 (exp.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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 (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 (+.f64 (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 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.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 (+.f64 (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 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (pow.f64 (pow.f64 (exp.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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 (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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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 (+.f64 (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 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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)))) (sin.f64 (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 (+.f64 (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 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.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)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.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 (+.f64 (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 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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)))))) |
#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))) (pow.f64 (exp.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 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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))) (pow.f64 (exp.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)))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) |
#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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) |
#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 (neg.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 (neg.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 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #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)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #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)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.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 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))) |
#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 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (neg.f64 y.re) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 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.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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 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))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re))))) |
#s(approx (neg y.re) (*.f64 #s(literal -1 binary64) y.re)) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (-.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (-.f64 (fma.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (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 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 x.re x.re)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re)))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (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 x.re) (/.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 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.re))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re))))))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 x.re x.re)))))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.re) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.re) (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #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 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (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 (*.f64 (sin.f64 (fma.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)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (pow.f64 (exp.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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re) (pow.f64 (exp.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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (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)) (*.f64 y.re (+.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) (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 (+ (* 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 (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (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)) (*.f64 y.re (-.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) 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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (-.f64 (/.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))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.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) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) 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 #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 (+ (* 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 (- (* (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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #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))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.re)) (* 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.re)) 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 (-.f64 (*.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))) (*.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 (*.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 (-.f64 (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)))) (*.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 (*.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 (-.f64 (*.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))) (*.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)))) (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)))) (*.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))) (*.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 (*.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 (-.f64 (fma.f64 y.im (-.f64 (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 y.im (-.f64 (*.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)))) (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 (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 (*.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))) (*.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 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.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)))) (*.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 (*.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 (-.f64 (*.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))) (*.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)))) (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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.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))) (*.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)))) (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)))) (*.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))) (*.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 (*.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)) (exp (* (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)) (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 (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)) (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 (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)))))) (*.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)) (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 (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)))) (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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (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 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 (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 (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 (* (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 (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (* 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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (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 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 (neg.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (neg.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))) |
#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 (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)) (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 (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)) (exp (* (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)) (exp (* (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/6 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 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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)))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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 (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (+.f64 (*.f64 #s(literal -1/6 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 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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)))))))))))))) |
#s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal -1/6 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 (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal -1/4 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)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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)))))))))))))) |
#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 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 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)))) (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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.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 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.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.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.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)))) (*.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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 y.im (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 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))) (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 (+ (* 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 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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 (+ (* 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 (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 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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 (+ (* 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 (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 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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 #s(literal 1/2 binary64) (PI.f64) (/.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 (+ (* 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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (-.f64 (fma.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (-.f64 (fma.f64 y.im (-.f64 (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 y.im (-.f64 (*.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)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* 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.re)) (* y.re (atan2 x.im x.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 x.re))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.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 (pow.f64 (log.f64 x.re) #s(literal 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 x.re)))))) |
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.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 (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/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)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))) |
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)))))))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))))) |
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))) (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) |
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))))))) |
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (+.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)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (-.f64 (*.f64 y.im (+.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)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#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.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (- (* (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 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))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) 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))) (sin.f64 (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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) 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 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 y.im (-.f64 (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 (PI.f64) y.im))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.re) (/.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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (- (* (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 (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 (+ (* 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 (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 (PI.f64) y.im)))))) |
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
Compiled 146 618 to 8 894 computations (93.9% saved)
22 alts after pruning (20 fresh and 2 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 506 | 15 | 1 521 |
| Fresh | 5 | 5 | 10 |
| Picked | 3 | 2 | 5 |
| Done | 0 | 0 | 0 |
| Total | 1 514 | 22 | 1 536 |
| Status | Accuracy | Program |
|---|---|---|
| 48.7% | (*.f64 (/.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.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)))) | |
| 32.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 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 53.3% | (*.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 #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))))) | |
| 27.1% | (*.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 #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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) | |
| 69.5% | (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) #s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 33.7% | (*.f64 (exp.f64 (/.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)))) (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)))) | |
| ▶ | 82.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))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| ▶ | 32.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 (*.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))))) |
| 33.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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| ✓ | 29.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 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 26.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))) #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))))))))) | |
| 44.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) (*.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.7% | (*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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)))))) |
| ▶ | 21.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))) #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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
| 24.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 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) | |
| 22.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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) | |
| 14.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))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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)))))))) | |
| ▶ | 55.7% | (*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
| 25.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)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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))))))) | |
| 25.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 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))))) | |
| 27.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.im))) (exp.f64 (*.f64 y.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.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 x.im))))))) | |
| ▶ | 23.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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
Compiled 3 341 to 1 573 computations (52.9% saved)
| Inputs |
|---|
(*.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.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)) |
(hypot.f64 x.re x.im) |
x.re |
x.im |
y.re |
(*.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 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) |
(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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))) |
(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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(literal 1/6 binary64) |
(/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) |
(pow.f64 (log.f64 x.im) #s(literal 3 binary64)) |
(log.f64 x.im) |
#s(literal 3 binary64) |
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) |
(exp.f64 y.im) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(literal 1/2 binary64) |
(/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(pow.f64 (log.f64 x.im) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) |
#s(literal -1 binary64) |
(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)) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
(*.f64 y.re (*.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)) |
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
(PI.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))) #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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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))))) |
(-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))) |
(sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))) |
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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))))))))) |
#s(literal 1 binary64) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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 (fma.f64 x.im x.im (*.f64 x.re x.re))) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 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)))))) |
(*.f64 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))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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)) |
(*.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))) |
(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)) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.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 (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))))) |
(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 (-.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 (*.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 (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 |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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 #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 (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (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 (/ (* (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 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))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 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)))))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (/ 1 (exp (* 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 (+ (* 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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.im y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))))))))) (* -1 (* y.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)))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))) (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (- (+ (* 1/2 (* 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 (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))) (* 1/4 (/ 1 (pow x.im 4)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (log (pow x.im 2)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (/ (pow x.re 2) (pow x.im 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* -1/2 (/ (pow x.re 2) (pow x.im 4))) (/ 1 (pow x.im 2))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/3 (/ (pow x.re 2) (pow x.im 6))) (* 1/2 (/ 1 (pow x.im 4))))) (/ 1 (pow x.im 2))))))) |
#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 (* y.im (* (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/2 (* y.im (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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (log x.im))) (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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* 1/2 (/ (* y.im (log x.im)) (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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/2 (* (pow x.re 2) (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (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)))) #s(hole binary64 (* y.im (pow (log 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)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (/ (* (pow x.re 2) (* y.im (log x.im))) (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)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* y.im (log x.im)) (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)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* y.im (log x.im)) (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))) #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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (* y.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))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1 (* y.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)))) (* -1 (* (pow x.re 2) (* y.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)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (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)))) (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (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)))) (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)))))) (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (log x.im)) (* y.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.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))) (* (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))) #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))) (* (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))) #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))) (* (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 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 (* (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) (* (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 (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)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/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 (- (+ (* 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)))))))) (* 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 (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 (+ (* 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im 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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -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 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/6 (/ (pow x.im 6) (pow x.re 6))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -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 (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ 1 x.re))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (/ (pow x.im 2) (pow x.re 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (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 (* y.im (* (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/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -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 (+ (* 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)))) #s(hole binary64 (* y.im (pow (log (/ 1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (* y.im (pow (log (/ 1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ 1 x.re)) 2)) (/ (* y.im (+ (* 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ 1 x.re)) 2)) (+ (/ (* y.im (+ (* -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 (+ (* 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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im 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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (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 (/ 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 (* (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) (* (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 (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im 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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -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 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/6 (/ (pow x.im 6) (pow x.re 6))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -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 (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ -1 x.re))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (/ (pow x.im 2) (pow x.re 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (pow x.im 2) (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))))) #s(hole binary64 (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -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 (+ (* 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)))) #s(hole binary64 (* y.im (pow (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (* y.im (pow (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ -1 x.re)) 2)) (/ (* y.im (+ (* 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ -1 x.re)) 2)) (+ (/ (* y.im (+ (* -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 (+ (* 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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im 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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (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 (/ -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 (* (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) (* (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 (- (* 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 #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 (* y.re (pow (log x.im) 3)) #s(hole binary64 (* y.re (pow (log x.im) 3)))) |
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (log x.im) 3))) |
#s(approx (log x.im) #s(hole binary64 (log x.im))) |
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.re y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))))))))) (* -1 (* y.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)))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))) (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ 1 (pow x.re 2))) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ 1 (pow x.re 2))) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (- (+ (* 1/2 (* 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 (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))) (* 1/4 (/ 1 (pow x.re 4)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (log (pow x.re 2)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (/ (pow x.im 2) (pow x.re 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* -1/2 (/ (pow x.im 2) (pow x.re 4))) (/ 1 (pow x.re 2))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/3 (/ (pow x.im 2) (pow x.re 6))) (* 1/2 (/ 1 (pow x.re 4))))) (/ 1 (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))))) #s(hole binary64 (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (log 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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* 1/2 (/ (* y.im (log 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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/2 (* (pow x.im 2) (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (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)))) #s(hole binary64 (* y.im (pow (log 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)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (/ (* (pow x.im 2) (* y.im (log 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)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* y.im (log 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)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* y.im (log 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))) #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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (* y.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))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1 (* y.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)))) (* -1 (* (pow x.im 2) (* y.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)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im 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)))) (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im 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)))) (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)))))) (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (log x.re)) (* y.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) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))) (* (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))) #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))) (* (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))) #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))) (* (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 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 (* (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) (* (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)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/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 (- (+ (* 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)))))))) (* 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 (- (* (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 (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 (* 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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* -1 (* y.re (pow (log (/ 1 x.im)) 3))))) |
#s(approx (pow (log x.im) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3)))) |
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (log (/ 1 x.im)) (exp (* 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 (+ (* -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 (+ (* 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.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 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/6 (/ (pow x.re 6) (pow x.im 6))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.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/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ 1 x.im))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (/ (pow x.re 2) (pow x.im 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (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 (* y.im (* (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/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.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/2 (/ (* y.im (+ (* 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)))) #s(hole binary64 (* y.im (pow (log (/ 1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (* y.im (pow (log (/ 1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ 1 x.im)) 2)) (/ (* y.im (+ (* 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ 1 x.im)) 2)) (+ (/ (* y.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)) (/ (* y.im (+ (* 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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* 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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* 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 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (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 (/ 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 (* (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) (* (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 (- (* (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 (* (/ (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (log (/ -1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log -1) (exp (* y.im (atan2 x.im x.re))))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log -1) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) |
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3))) |
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im)))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (+ (log -1) (* -1 (log (/ -1 x.im)))) (exp (* 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 -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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.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 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/6 (/ (pow x.re 6) (pow x.im 6))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.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/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ -1 x.im))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (/ (pow x.re 2) (pow x.im 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (pow x.re 2) (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))))) #s(hole binary64 (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.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/2 (/ (* y.im (+ (* 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)))) #s(hole binary64 (* y.im (pow (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (* y.im (pow (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ -1 x.im)) 2)) (/ (* y.im (+ (* 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ -1 x.im)) 2)) (+ (/ (* y.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)) (/ (* y.im (+ (* 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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* 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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* 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 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (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 (/ -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 (* (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) (* (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 (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 (* 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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 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))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (pow (log x.im) 2) (exp (* 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))))) |
#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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))) |
#s(approx (neg y.re) #s(hole binary64 (* -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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)))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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)))) (* (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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (+ (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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/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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))) #s(hole binary64 (+ (* -1 (* (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))))) |
#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 (+ (* -1 (* y.re (atan2 x.im x.re))) (* 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 (* (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* 1/6 (/ (* (pow y.re 3) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (/ 1 (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/6 (/ (* (pow y.re 2) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow 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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (- (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re) (* -1 (* (sin (+ (* 1/2 (PI)) (* y.im (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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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))))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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))))) (* y.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 (* y.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 (* 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.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (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))) #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))))) |
#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 (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (* y.re (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (log x.im) (exp (* y.im (atan2 x.im x.re))))) (/ 1 (* y.re (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (/ (log x.im) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re)) (* (sin (+ (* 1/2 (PI)) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (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 (* (/ (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))) (* 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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re))))) (atan2 x.im x.re))) (* 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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))) (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (+ (* -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)))))) (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re))))) (atan2 x.im x.re))) (* 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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (+ (* y.im (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* y.re (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))) (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))))))))))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.re (pow (log x.im) 3)))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))) (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3))))) |
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 1)) |
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (pow (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 (pow (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 (exp y.im) #s(hole binary64 1)) |
#s(approx (exp y.im) #s(hole binary64 (+ 1 y.im))) |
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* 1/2 y.im)))))) |
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* y.im (+ 1/2 (* 1/6 y.im)))))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (pow (log x.im) 2)))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* 1/2 (pow (log x.im) 2))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (log x.im))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* -1 (* y.im (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* y.im (- (* -1 (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 1)) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #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 (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #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 (+ (* 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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#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 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 1)) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (+ 1 (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (+ 1 (* y.im (- (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* -1/2 (log (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* y.im (+ (* -1/2 (log (+ (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 (neg y.im) #s(hole binary64 (* -1 y.im))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (* 1/2 (log (+ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (+ (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 (* 1/2 (* y.im (* (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/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 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)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.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 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* 1/2 (* y.re (* (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))) (atan2 x.im x.re)) #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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (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))) (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)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (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))) #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (* (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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (+ (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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/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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (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 (* (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) (* (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 (- (* (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 (exp y.im) #s(hole binary64 (exp 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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow 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))) #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 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (* (pow y.im 2) (- (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (* (pow y.im 2) (- (/ 1 (pow y.im 2)) (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (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))) #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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (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))))) |
#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)))) (* -1 (/ (* 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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (* (pow y.im 2) (- (+ (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (/ 1 (pow y.im 2))) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 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 (+ (* -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.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (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))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
12 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 192.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 (+ (* (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.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)) (* (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)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (neg y.im) (+ (* 1/2 (log (+ (* 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 (+ (* x.im x.im) (* x.re x.re))) (+ (* 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))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) |
| 62.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 (+ (* (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.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)) (* (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)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (neg y.im) (+ (* 1/2 (log (+ (* 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 (+ (* x.im x.im) (* x.re x.re))) (+ (* 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))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) |
| 56.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 (+ (* (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.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)) (* (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)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (neg y.im) (+ (* 1/2 (log (+ (* 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 (+ (* x.im x.im) (* x.re x.re))) (+ (* 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))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) |
| 53.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.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)) (* (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)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (neg y.im) (+ (* 1/2 (log (+ (* 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 (+ (* x.im x.im) (* x.re x.re))) (+ (* 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))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) |
| 49.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.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)) (* (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)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (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)))) (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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (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) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (neg y.im) (+ (* 1/2 (log (+ (* 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 (+ (* x.im x.im) (* x.re x.re))) (+ (* 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))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 | 5848 | 113046 |
| 0 | 6010 | 104793 |
| 0 | 8300 | 97892 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
(*.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.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)) |
(hypot.f64 x.re x.im) |
x.re |
x.im |
y.re |
(*.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 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) |
(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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))) |
(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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(literal 1/6 binary64) |
(/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) |
(pow.f64 (log.f64 x.im) #s(literal 3 binary64)) |
(log.f64 x.im) |
#s(literal 3 binary64) |
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) |
(exp.f64 y.im) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(literal 1/2 binary64) |
(/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(pow.f64 (log.f64 x.im) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) |
#s(literal -1 binary64) |
(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)) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
(*.f64 y.re (*.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)) |
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
(PI.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))) #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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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))))) |
(-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))) |
(sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))) |
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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))))))))) |
#s(literal 1 binary64) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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 (fma.f64 x.im x.im (*.f64 x.re x.re))) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 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)))))) |
(*.f64 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))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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)) |
(*.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))) |
(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)) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.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 (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))))) |
(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 (-.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 (*.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 (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)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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 #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 (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (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 (/ (* (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 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))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 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)))))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (/ 1 (exp (* 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 (+ (* 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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.im y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))))))))) (* -1 (* y.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)))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))) |
#s(approx (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))) (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (- (+ (* 1/2 (* 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 (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))) (* 1/4 (/ 1 (pow x.im 4)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (log (pow x.im 2)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (/ (pow x.re 2) (pow x.im 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* -1/2 (/ (pow x.re 2) (pow x.im 4))) (/ 1 (pow x.im 2))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/3 (/ (pow x.re 2) (pow x.im 6))) (* 1/2 (/ 1 (pow x.im 4))))) (/ 1 (pow x.im 2))))))) |
#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 (* y.im (* (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/2 (* y.im (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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (log x.im))) (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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* 1/2 (/ (* y.im (log x.im)) (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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/2 (* (pow x.re 2) (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (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)))) #s(hole binary64 (* y.im (pow (log 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)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (/ (* (pow x.re 2) (* y.im (log x.im))) (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)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* y.im (log x.im)) (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)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* y.im (log x.im)) (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))) #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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (* y.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))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1 (* y.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)))) (* -1 (* (pow x.re 2) (* y.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)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (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)))) (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (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)))) (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)))))) (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (log x.im)) (* y.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.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))) (* (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))) #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))) (* (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))) #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))) (* (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 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 (* (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) (* (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 (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)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/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 (- (+ (* 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)))))))) (* 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 (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 (+ (* 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im 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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -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 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/6 (/ (pow x.im 6) (pow x.re 6))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -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 (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ 1 x.re))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (/ (pow x.im 2) (pow x.re 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (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 (* y.im (* (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/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -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 (+ (* 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)))) #s(hole binary64 (* y.im (pow (log (/ 1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (* y.im (pow (log (/ 1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ 1 x.re)) 2)) (/ (* y.im (+ (* 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ 1 x.re)) 2)) (+ (/ (* y.im (+ (* -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 (+ (* 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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im 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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (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 (/ 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 (* (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) (* (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 (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im 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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -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 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/6 (/ (pow x.im 6) (pow x.re 6))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -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 (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ -1 x.re))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (/ (pow x.im 2) (pow x.re 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (pow x.im 2) (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))))) #s(hole binary64 (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -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 (+ (* 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)))) #s(hole binary64 (* y.im (pow (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (* y.im (pow (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ -1 x.re)) 2)) (/ (* y.im (+ (* 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ -1 x.re)) 2)) (+ (/ (* y.im (+ (* -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 (+ (* 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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im 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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (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 (/ -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 (* (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) (* (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 (- (* 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 #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 (* y.re (pow (log x.im) 3)) #s(hole binary64 (* y.re (pow (log x.im) 3)))) |
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (log x.im) 3))) |
#s(approx (log x.im) #s(hole binary64 (log x.im))) |
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.re y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))))))))) (* -1 (* y.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)))))))) (* -1 (* y.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))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))) (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ 1 (pow x.re 2))) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ 1 (pow x.re 2))) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (- (+ (* 1/2 (* 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 (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))) (* 1/4 (/ 1 (pow x.re 4)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (log (pow x.re 2)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (/ (pow x.im 2) (pow x.re 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* -1/2 (/ (pow x.im 2) (pow x.re 4))) (/ 1 (pow x.re 2))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/3 (/ (pow x.im 2) (pow x.re 6))) (* 1/2 (/ 1 (pow x.re 4))))) (/ 1 (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))))) #s(hole binary64 (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (log 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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* 1/2 (/ (* y.im (log 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))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/2 (* (pow x.im 2) (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (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)))) #s(hole binary64 (* y.im (pow (log 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)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (/ (* (pow x.im 2) (* y.im (log 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)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* y.im (log 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)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* y.im (log 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))) #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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (* y.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))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1 (* y.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)))) (* -1 (* (pow x.im 2) (* y.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)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im 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)))) (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im 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)))) (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)))))) (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (log x.re)) (* y.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) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))) (* (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))) #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))) (* (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))) #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))) (* (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 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 (* (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) (* (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)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/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 (- (+ (* 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)))))))) (* 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 (- (* (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 (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 (* 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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* -1 (* y.re (pow (log (/ 1 x.im)) 3))))) |
#s(approx (pow (log x.im) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3)))) |
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (log (/ 1 x.im)) (exp (* 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 (+ (* -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 (+ (* 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.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 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/6 (/ (pow x.re 6) (pow x.im 6))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.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/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ 1 x.im))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (/ (pow x.re 2) (pow x.im 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (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 (* y.im (* (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/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.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/2 (/ (* y.im (+ (* 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)))) #s(hole binary64 (* y.im (pow (log (/ 1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (* y.im (pow (log (/ 1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ 1 x.im)) 2)) (/ (* y.im (+ (* 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ 1 x.im)) 2)) (+ (/ (* y.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)) (/ (* y.im (+ (* 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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* 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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* 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 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (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 (/ 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 (* (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) (* (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 (- (* (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 (* (/ (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (log (/ -1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log -1) (exp (* y.im (atan2 x.im x.re))))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log -1) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) |
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3))) |
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im)))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (+ (log -1) (* -1 (log (/ -1 x.im)))) (exp (* 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 -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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.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 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/6 (/ (pow x.re 6) (pow x.im 6))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.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/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ -1 x.im))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (/ (pow x.re 2) (pow x.im 2))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (pow x.re 2) (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))))) #s(hole binary64 (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (* 1/2 (* y.im (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (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))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.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/2 (/ (* y.im (+ (* 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)))) #s(hole binary64 (* y.im (pow (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (* y.im (pow (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ -1 x.im)) 2)) (/ (* y.im (+ (* 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)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ -1 x.im)) 2)) (+ (/ (* y.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)) (/ (* y.im (+ (* 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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.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))) (+ (* -1 (/ (* y.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))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 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))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (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)) (/ (* (+ (* 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))))))) |
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* 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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* 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 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (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 (/ -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 (* (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) (* (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 (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 (* 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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 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))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (pow (log x.im) 2) (exp (* 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))))) |
#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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))) |
#s(approx (neg y.re) #s(hole binary64 (* -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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)))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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)))) (* (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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (+ (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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/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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))) #s(hole binary64 (+ (* -1 (* (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))))) |
#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 (+ (* -1 (* y.re (atan2 x.im x.re))) (* 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 (* (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* 1/6 (/ (* (pow y.re 3) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (/ 1 (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/6 (/ (* (pow y.re 2) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow 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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (- (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re) (* -1 (* (sin (+ (* 1/2 (PI)) (* y.im (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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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))))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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))))) (* y.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 (* y.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 (* 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.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (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))) #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))))) |
#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 (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (* y.re (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (log x.im) (exp (* y.im (atan2 x.im x.re))))) (/ 1 (* y.re (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (/ (log x.im) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re)) (* (sin (+ (* 1/2 (PI)) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (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 (* (/ (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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))) (* 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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re))))) (atan2 x.im x.re))) (* 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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))) (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (+ (* -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)))))) (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re))))) (atan2 x.im x.re))) (* 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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (+ (* y.im (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* y.re (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))) (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))))))))))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.re (pow (log x.im) 3)))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))) (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3))))) |
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 1)) |
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (pow (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 (pow (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 (exp y.im) #s(hole binary64 1)) |
#s(approx (exp y.im) #s(hole binary64 (+ 1 y.im))) |
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* 1/2 y.im)))))) |
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* y.im (+ 1/2 (* 1/6 y.im)))))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (pow (log x.im) 2)))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* 1/2 (pow (log x.im) 2))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (log x.im))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* -1 (* y.im (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* y.im (- (* -1 (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 1)) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #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 (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #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 (+ (* 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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #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/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#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 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 1)) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (+ 1 (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (+ 1 (* y.im (- (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* -1/2 (log (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* y.im (+ (* -1/2 (log (+ (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 (neg y.im) #s(hole binary64 (* -1 y.im))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (* 1/2 (log (+ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (+ (* 1/2 (log (+ (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 (* 1/2 (* y.im (* (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/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 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)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.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 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* 1/2 (* y.re (* (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))) (atan2 x.im x.re)) #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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (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))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (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))) (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)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (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))) #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (* (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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (+ (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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/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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (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 (* (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) (* (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 (- (* (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 (exp y.im) #s(hole binary64 (exp 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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow 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))) #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 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (* (pow y.im 2) (- (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (* (pow y.im 2) (- (/ 1 (pow y.im 2)) (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (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))) #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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (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))))) |
#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)))) (* -1 (/ (* 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))))))) |
#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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(hole binary64 (* (pow y.im 2) (- (+ (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (/ 1 (pow y.im 2))) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 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 (+ (* -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.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (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))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
| 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 (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 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.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)) |
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))) |
(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) (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 (neg.f64 x.im)) |
(hypot.f64 x.re (fabs.f64 x.im)) |
(hypot.f64 x.re x.im) |
x.re |
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)))) |
(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 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) |
(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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))) |
(+.f64 (*.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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))) |
(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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
(+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(literal 1/6 binary64) |
(/.f64 (neg.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) |
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (log.f64 x.im)) |
(*.f64 (log.f64 x.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) |
(pow.f64 (log.f64 x.im) #s(literal 3 binary64)) |
(exp.f64 (*.f64 (log.f64 (log.f64 x.im)) #s(literal 3 binary64))) |
(log.f64 x.im) |
#s(literal 3 binary64) |
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) |
(exp.f64 (*.f64 (log.f64 (exp.f64 y.im)) (atan2.f64 x.im x.re))) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(exp.f64 y.im) |
(+.f64 (cosh.f64 y.im) (sinh.f64 y.im)) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(literal 1/2 binary64) |
(/.f64 (neg.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 x.im) (log.f64 x.im)) |
(pow.f64 (log.f64 x.im) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (log.f64 x.im)) #s(literal 2 binary64))) |
#s(literal 2 binary64) |
(/.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) |
(pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(-.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) #s(literal -1 binary64))) |
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (cosh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(literal -1 binary64) |
(fma.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (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 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.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)) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.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 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.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)) |
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))) |
(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) (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 (neg.f64 x.im)) |
(hypot.f64 x.re (fabs.f64 x.im)) |
(hypot.f64 x.re 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 x.im x.im)) |
(*.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))) |
(*.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))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
(*.f64 y.re (*.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)) |
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
(PI.f64) |
(*.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 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
(-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) |
(sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))) |
(log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))) |
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) |
#s(literal 1 binary64) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) |
(+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) |
(log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) |
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)) |
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) |
(*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) |
(*.f64 (neg.f64 (log.f64 (hypot.f64 x.im x.re))) (neg.f64 (log.f64 (hypot.f64 x.im x.re)))) |
(*.f64 (fabs.f64 (log.f64 (hypot.f64 x.im x.re))) (fabs.f64 (log.f64 (hypot.f64 x.im x.re)))) |
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) |
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (log.f64 (hypot.f64 x.im x.re))) #s(literal 2 binary64))) |
(log.f64 (pow.f64 (hypot.f64 x.im x.re) (log.f64 (hypot.f64 x.im x.re)))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))) |
(log.f64 (hypot.f64 x.im x.re)) |
(pow.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) |
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re)) |
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re)) |
(hypot.f64 (neg.f64 x.im) x.re) |
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re)) |
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re)) |
(hypot.f64 (fabs.f64 x.im) x.re) |
(hypot.f64 x.im (neg.f64 x.re)) |
(hypot.f64 x.im (fabs.f64 x.re)) |
(hypot.f64 x.im x.re) |
(exp.f64 (*.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) |
(neg.f64 y.re) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) |
(fma.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
(cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
(+.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(+.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64)) |
(/.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 (*.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))))) |
(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 (neg.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)))) (neg.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.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 (*.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 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.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 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))) |
(*.f64 (fabs.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (fabs.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))) |
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) |
(pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 2 binary64)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) |
(*.f64 (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (fabs.f64 (*.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)) |
(pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) |
(-.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) (* (atan2 x.im 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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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) (+.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)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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) (-.f64 (*.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) (-.f64 (*.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) |
#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 (*.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 (*.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 (*.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 (* (atan2 x.im x.re) y.re) (*.f64 y.re (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))))) (/.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)) (pow.f64 (exp.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) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))) |
#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 (+ (* 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 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) |
#s(approx (* x.re x.re) (*.f64 x.re x.re)) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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.im))))) (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 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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/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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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))))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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.im))))) (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 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (* 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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 y.im (log.f64 x.im)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (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 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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/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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 x.im))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/720 binary64) (*.f64 (*.f64 x.re x.re) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (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 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 x.im y.im))) (*.f64 x.im x.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.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 (*.f64 y.im y.im) (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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))) (pow.f64 x.im y.im)))))) (pow.f64 x.im y.im))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 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 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 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 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 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 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal 2 binary64) (log.f64 x.im))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re 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))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 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)))) (*.f64 y.im (pow.f64 (log.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)))) (fma.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im)))) |
#s(approx (* y.im (* (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 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)))))) |
#s(approx (* y.im (* (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 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 x.re x.re) (*.f64 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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im 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))) (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 (*.f64 x.re x.re) (log.f64 x.im)) (*.f64 x.im x.im)) (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 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re 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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (/.f64 (log.f64 x.im) (*.f64 x.im x.im))) (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 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 x.re 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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (log.f64 x.im) (*.f64 x.im x.im))) (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 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.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 (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 (*.f64 x.re x.re) x.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.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 x.im x.im))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (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 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.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.im))))) (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 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (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 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.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.im))))) (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 #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 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (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))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.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))) (atan2 x.im x.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/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im 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)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (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 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/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 x.im x.im))) (*.f64 (*.f64 x.re 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.im))))) (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 #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))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (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 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/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 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -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 (*.f64 y.im y.im) (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 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (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 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))) (*.f64 x.im 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 (*.f64 x.re x.re) (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))))) (*.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 #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 (*.f64 y.im y.im) (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 (*.f64 x.re x.re) (+.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))))) (*.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 #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 (*.f64 y.im y.im) (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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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 (+ (* 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 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.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 (*.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 (+ (* 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 (*.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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)))))))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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))))))))))))))))))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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)))))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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)))))))))) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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))))))))))))))))))) |
#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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (log.f64 x.im))) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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)) (pow.f64 (*.f64 y.im (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 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (log.f64 x.im))) (*.f64 x.im x.im)))) |
#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 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (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 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 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) (* (atan2 x.im x.re) y.re)) (pow.f64 (*.f64 y.re (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 (*.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)) (-.f64 (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))) (*.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 (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)))))) (*.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 (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))))))))) (*.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 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (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.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 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)) (-.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 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 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 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 (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 (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.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) (*.f64 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 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))) |
#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) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.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) (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) (*.f64 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 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) 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)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (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 (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re 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/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (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 (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re 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/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (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 (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -2 binary64)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re)) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re 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))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 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)))) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 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)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re))) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 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))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) |
#s(approx (* (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 (*.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (*.f64 x.re x.re)) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))) |
#s(approx (* (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 (*.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (*.f64 x.re 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/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) |
#s(approx (* (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 (*.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (*.f64 x.re x.re)) (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 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (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 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#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 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#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 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 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 #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))) (atan2 x.im 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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re 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 #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))) (atan2 x.im x.re)) (+.f64 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (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) (PI.f64)))) (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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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))) (atan2 x.im 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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (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) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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))) (sin.f64 (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) (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) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #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 (*.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64))) (/.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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (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) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.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) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.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 (*.f64 x.im x.im) y.im) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.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 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.im (*.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.im (*.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (neg.f64 (log.f64 x.re))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (neg.f64 (log.f64 x.re))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (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)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))) |
#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 (- (* (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) (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)) (-.f64 (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)))) (*.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 (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))))) (*.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 (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)))))) (*.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 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (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.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) 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)) (-.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 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 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 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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.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) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))) |
#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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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 (*.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) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) 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)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.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 (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re 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/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (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 (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re 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/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (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 (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -2 binary64)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re 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))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)))) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re))) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 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))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) |
#s(approx (* (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 (*.f64 x.im x.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 x.re x.re)) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))) |
#s(approx (* (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 (*.f64 x.im x.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 x.re 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/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) |
#s(approx (* (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 (*.f64 x.im x.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 x.re x.re)) (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 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (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 (*.f64 x.im x.im) (*.f64 x.re 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) (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 (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 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 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 #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))) (atan2 x.im 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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re 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 #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))) (atan2 x.im x.re)) (+.f64 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (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) (PI.f64)))) (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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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))) (atan2 x.im 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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (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) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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))) (sin.f64 (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) (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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #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 (*.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64))) (/.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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (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) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.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) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.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 (*.f64 x.im x.im) y.im) (*.f64 x.re 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.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 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.im (*.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.im (*.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (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)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))) |
#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 (- (* (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) (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)) (-.f64 (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)))) (*.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 (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))))) (*.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 (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)))))) (*.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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) (+.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)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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) (-.f64 (*.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) (-.f64 (*.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) |
#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 (*.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 (*.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 (*.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 (* y.re (pow (log x.im) 3)) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) |
#s(approx (pow (log x.im) 3) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) |
#s(approx (log x.im) (log.f64 x.im)) |
#s(approx (pow (log x.im) 2) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) |
#s(approx (* x.im x.im) (*.f64 x.im x.im)) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 y.im y.im) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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/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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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))))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 y.im y.im) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 y.im (log.f64 x.re)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (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 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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/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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 x.re))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/720 binary64) (*.f64 (*.f64 x.im x.im) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (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 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 x.re y.im))) (*.f64 x.re x.re)) (pow.f64 x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.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 (*.f64 y.im y.im) (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 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))) (pow.f64 x.re y.im)))))) (pow.f64 x.re y.im))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 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 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 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 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 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 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal 2 binary64) (log.f64 x.re))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.re) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (pow.f64 (*.f64 x.re x.re) #s(literal -1 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))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (log.f64 x.re))) (*.f64 x.re 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 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)))) (*.f64 y.im (pow.f64 (log.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)))) (fma.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (log.f64 x.re))) (*.f64 x.re 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)))) (fma.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re 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)))) (fma.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 x.im x.im) (*.f64 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)))))) |
#s(approx (* (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 (*.f64 x.im x.im) (log.f64 x.re)) (*.f64 x.re x.re)) (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 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (/.f64 (log.f64 x.re) (*.f64 x.re x.re))) (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 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 x.im x.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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (log.f64 x.re) (*.f64 x.re x.re))) (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 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.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 x.re x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.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 (*.f64 y.im y.im) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.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 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 (*.f64 y.im y.im) (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 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (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))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.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 x.re 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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (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 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/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 x.re x.re))) (*.f64 (*.f64 x.im 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.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 #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))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (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 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/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 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -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 (*.f64 y.im y.im) (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 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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))))))) (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 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))) (*.f64 x.re 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 (*.f64 x.im x.im) (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))))) (*.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 #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 (*.f64 y.im y.im) (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 (*.f64 x.im x.im) (+.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))))) (*.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 #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 (*.f64 y.im y.im) (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 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 (*.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 (+ (* 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 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.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 (*.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 (+ (* 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 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (log.f64 x.re))) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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)) (pow.f64 (*.f64 y.im (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 (*.f64 y.im y.im) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (log.f64 x.re))) (*.f64 x.re 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)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (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 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.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)) (-.f64 (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))) (*.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 (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)))))) (*.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 (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))))))))) (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -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 #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 #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 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 (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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 -1 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 (* (/ (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.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 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (* y.re (pow (log x.im) 3)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))))) |
#s(approx (pow (log x.im) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64)))) |
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (pow (log x.im) 2) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (pow.f64 (exp.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 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))) |
#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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) 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)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.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)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.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)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im 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/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (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 (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im 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/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (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 (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.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))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.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))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 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)))) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 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))) (pow.f64 (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 x.im x.im)) (pow.f64 (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 x.im 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/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 x.im x.im)) (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 (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 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) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.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 (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 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#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 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#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 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.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))) (atan2 x.im x.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.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))) (atan2 x.im x.re)) (+.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (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))) (atan2 x.im x.re)) (+.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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))))))))) (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))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im 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 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.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 -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im 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 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.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 -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.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 (+ (* 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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) |
#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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))) |
#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 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.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)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.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)))) (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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.im #s(literal 6 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.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)))) (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (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.im #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 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)))) (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (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)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))) |
#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 -1 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 -1 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 -1 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 -1 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 (- (* (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) (*.f64 y.im (*.f64 #s(literal -1 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)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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)))) (*.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 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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))))) (*.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 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 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)))))) (*.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 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (*.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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)) (-.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 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 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 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 (* (/ (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 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.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 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 #s(literal -1 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 #s(literal -1 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (* y.re (pow (log x.im) 3)) (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))) |
#s(approx (pow (log x.im) 3) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))) |
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (pow (log x.im) 2) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (pow.f64 (exp.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 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.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)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.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) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))) |
#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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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 (*.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) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (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 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.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) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) 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)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) 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/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.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 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.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 (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im 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/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (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 (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im 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/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (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 (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -2 binary64)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.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))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.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))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)))) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) |
#s(approx (* y.im (* (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 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im))) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) |
#s(approx (* y.im (* (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 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 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))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 x.im x.im)) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 x.im 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/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 x.im x.im)) (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 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (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 (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 (*.f64 x.re x.re) (*.f64 x.im 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) (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 (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 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 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 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 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 #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))) (atan2 x.im x.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (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) (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))) (atan2 x.im x.re)) (+.f64 (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (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) (PI.f64)))) (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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (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))) (atan2 x.im x.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (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) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64))) (/.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))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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))) (sin.f64 (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) (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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (sin.f64 (+.f64 (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) (PI.f64))) (/.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 #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 (*.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 #s(literal 1/2 binary64) (PI.f64)))))) (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 #s(literal 1/2 binary64) (PI.f64))) (/.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 #s(literal 1/2 binary64) (PI.f64))) (/.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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (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) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.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) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (*.f64 x.re x.re) y.im) (*.f64 x.im 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (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)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))) |
#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 (- (* (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) (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)) (-.f64 (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)))) (*.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 (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))))) (*.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 (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)))))) (*.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 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (log.f64 (hypot.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 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (log.f64 (hypot.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 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (log.f64 (hypot.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.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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.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 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.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 (hypot.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)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (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))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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))) (pow.f64 (exp.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)))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) |
#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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.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 (*.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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #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)))) (+.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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #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)))) (+.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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.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 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re))))) |
#s(approx (neg y.re) (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#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 (log.f64 (hypot.f64 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.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))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.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)) (log.f64 (pow.f64 (hypot.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)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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)))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.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))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.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 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 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))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im 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)) (*.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 y.re (log.f64 x.im)) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.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)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (log.f64 x.im) (*.f64 (*.f64 y.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) #s(literal -1 binary64)) (/.f64 (log.f64 x.im) (*.f64 (*.f64 y.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.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)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (log.f64 x.im) (*.f64 (*.f64 y.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.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)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (-.f64 (/.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.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))) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.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 (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) 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 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 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)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (log.f64 x.im) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) y.re) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) #s(literal -1 binary64))) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) y.re) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 x.im) (*.f64 y.re (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) y.re) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.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 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.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) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.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)))) (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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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)))) (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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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)))) (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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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))) (pow.f64 (hypot.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))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.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))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.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))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.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)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.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 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.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 (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.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))))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+.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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 y.im (-.f64 (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 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))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) (atan2.f64 x.im x.re)) (*.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 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 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) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 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) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (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 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (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)))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 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))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) (atan2.f64 x.im x.re)) (*.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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+.f64 (log.f64 x.im) (fma.f64 y.im (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+.f64 (log.f64 x.im) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.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 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+.f64 (log.f64 x.im) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 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) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 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) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (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 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.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 (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.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 (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))) |
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 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) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 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) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))))))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (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 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) |
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (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 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 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) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) |
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(literal 1 binary64)) |
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (pow (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 (pow (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 (exp y.im) #s(literal 1 binary64)) |
#s(approx (exp y.im) (+.f64 #s(literal 1 binary64) y.im)) |
#s(approx (exp y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) y.im))))) |
#s(approx (exp y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) y.im))))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))) |
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 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) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) |
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (/ (pow (log x.im) 2) (pow (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 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (/ (pow (log x.im) 2) (pow (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 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 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) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (log.f64 x.im)) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (+.f64 (log.f64 x.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (+.f64 (log.f64 x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (+.f64 (log.f64 x.im) (*.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 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (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 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(literal 1 binary64)) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) (+.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 (pow (pow (exp y.im) (atan2 x.im x.re)) -1) (+.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 (+ (* 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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#s(approx (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) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))) |
#s(approx (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) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))))))) |
#s(approx (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) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#s(approx (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) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))) |
#s(approx (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) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) |
#s(approx (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) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))))))) |
#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) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) #s(literal 1 binary64)) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) |
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im)) |
#s(approx (+ (* 1/2 (log (+ (* 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.f64 (hypot.f64 x.im x.re))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.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))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.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)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.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 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.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.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im 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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im 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 (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im 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 (+ (* 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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))) |
#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 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))) |
#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 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))) |
#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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.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))) (-.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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)) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (hypot.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 (log.f64 (pow.f64 (hypot.f64 x.im 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.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (exp y.im) (exp.f64 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 (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (hypot.f64 x.im x.re) y.im)) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im)) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (*.f64 (*.f64 y.im y.im) (-.f64 (pow.f64 (*.f64 y.im y.im) #s(literal -1 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)))) |
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* 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))))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.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)) (log.f64 (pow.f64 (hypot.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 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im))))) |
#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 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.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 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.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 (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* 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)))))))) (*.f64 (*.f64 y.im y.im) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (pow.f64 (*.f64 y.im y.im) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (+ (* 1/2 (log (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) |
#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 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im)))))) |
#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 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.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 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
Compiled 270 204 to 14 769 computations (94.5% saved)
15 alts after pruning (14 fresh and 1 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 2 032 | 9 | 2 041 |
| Fresh | 10 | 5 | 15 |
| Picked | 4 | 1 | 5 |
| Done | 2 | 0 | 2 |
| Total | 2 048 | 15 | 2 063 |
| Status | Accuracy | Program |
|---|---|---|
| 32.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 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 69.5% | (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) #s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 33.7% | (*.f64 (exp.f64 (/.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)))) (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)))) | |
| ▶ | 76.0% | (*.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 (+ (* (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 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
| 60.2% | (*.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 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.f64 x.im x.re)))))))) | |
| ▶ | 81.7% | (*.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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))) |
| 22.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) | |
| ▶ | 14.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 (*.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 #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))))) |
| 21.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 (*.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))) #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 (atan2.f64 x.im x.re))))))) | |
| 16.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 #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)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.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))))) | |
| ▶ | 10.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
| 24.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 #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))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) | |
| 24.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 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) | |
| ✓ | 55.7% | (*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
| ▶ | 27.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.im))) (exp.f64 (*.f64 y.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.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 x.im))))))) |
Compiled 2 109 to 1 094 computations (48.1% saved)
| Inputs |
|---|
(*.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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.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)) |
(hypot.f64 x.re x.im) |
x.re |
x.im |
y.re |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))) |
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (hypot.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)) |
(*.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 (hypot.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 (hypot.f64 x.im x.re))) |
(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 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
#s(literal 2 binary64) |
(log.f64 (hypot.f64 x.im x.re)) |
(hypot.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)))) #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 (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 x.im))))))) |
(*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.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.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 x.im)))))) |
(/.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)) |
#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 (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 x.im))))) |
(-.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 x.im)))) |
(*.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 x.im))) |
(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 x.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))) (sin.f64 (/.f64 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re 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) |
(*.f64 x.im x.im) |
(sin.f64 (/.f64 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
(*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 y.re y.re) |
(-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) |
(pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) |
(log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) |
(pow.f64 (hypot.f64 x.im x.re) y.im) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
(-.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) |
(*.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 #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))))) |
(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 #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 (-.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 #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 (*.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 (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 #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 (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) |
(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))))) |
#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)))) |
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)) |
#s(literal 1/2 binary64) |
(/.f64 (*.f64 x.re x.re) x.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))) (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.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (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.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.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 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
(*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))) |
(+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) |
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) |
| 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 #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (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)))))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (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))) #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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (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))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (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))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (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 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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 (* (/ (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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (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 x.im)) #s(hole binary64 (* (log x.im) (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (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 (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (log x.im)) (* y.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.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))) (* (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))) #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))) (* (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))) #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))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (pow x.im 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (* (pow x.im 2) (pow y.re 2))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))) (* (pow x.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (* (pow x.im 2) (pow y.re 2))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))) (* (pow x.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (pow (log (pow x.im y.im)) 2))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (pow x.im 2)) (pow (log (pow x.im y.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 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/4 (/ (pow y.im 2) (pow x.im 4))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (pow (log (pow x.im y.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 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/4 (/ (pow y.im 2) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/360 (* (log (pow x.im y.im)) (+ (* -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 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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)))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (pow (log (pow x.im y.im)) 2)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.im y.im)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.im y.im))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (atan2 x.im x.re) 2) #s(hole binary64 (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 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)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/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 (- (+ (* 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)))))))) (* y.re (atan2 x.im x.re))))) |
#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 (* (* (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)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 x.im)) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im)))) |
#s(approx (/ (* x.re x.re) x.im) #s(hole binary64 (/ (pow x.re 2) x.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 (+ (* 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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.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 (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4))))))))))))) |
#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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im 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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.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.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.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.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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 y.re 2))) (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.re 6))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (* (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 (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im)))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.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 (+ (* -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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im 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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.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.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.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.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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 y.re 2))) (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.re 6))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (* (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 (+ (* (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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (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)))))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (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))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6)))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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 (* 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (log x.re)) (* y.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) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))) (* (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))) #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))) (* (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))) #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))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (pow x.re 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.re 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (* (pow x.re 2) (pow y.re 2))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))) (* (pow x.im 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (* (pow x.re 2) (pow y.re 2))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))) (* (pow x.im 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (pow (log (pow x.re y.im)) 2))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (pow x.re 2)) (pow (log (pow x.re y.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 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/4 (/ (pow y.im 2) (pow x.re 4))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (pow (log (pow x.re y.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 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/4 (/ (pow y.im 2) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/360 (* (log (pow x.re y.im)) (+ (* -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 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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)))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (pow (log (pow x.re y.im)) 2)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.re y.im)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.re y.im))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/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 (- (+ (* 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)))))))) (* y.re (atan2 x.im x.re))))) |
#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)) #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 (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.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 (+ (* 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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (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.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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 (* 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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* y.im (* (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 x.im)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* 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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* 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 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4))))))))))))) |
#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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (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))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (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))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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 y.re 2))) (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.im 6))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (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 (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (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 (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (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 (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (* (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 (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (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 (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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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 (* 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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* 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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* 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 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (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))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (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))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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 y.re 2))) (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.im 6))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (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 (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (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 (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (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 (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (* (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 (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1))))) |
#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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* 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)))))) (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.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))))) (* y.re (+ (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* -1/6 (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 (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* 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)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 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)))))) (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.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))))) (* -1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* 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 (* 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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* 1/2 (* y.im (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re)))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* 1/2 (* y.im (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* y.re (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* 1/2 (* y.im (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (log x.im) (sin (* 1/2 (PI)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re)))) (* (log x.im) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* (log x.im) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* (log x.im) (sin (* 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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)))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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)))) (* (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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (+ (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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/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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))) #s(hole binary64 (+ (* -1 (* (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))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2)))) |
#s(approx (* y.re y.re) #s(hole binary64 (pow y.re 2))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (/ (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.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))))))) |
#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 (atan2 x.im x.re))) (* 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))))))) |
#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.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* 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)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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))))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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))))) (* y.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 (* y.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 (* 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.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (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))) #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))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* -1 (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (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 (* -1 (* 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.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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* 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.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.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (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 (+ (* (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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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 (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* 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.re)) (* -1 (/ (atan2 x.im x.re) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (sin (* y.re (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 (* (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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (neg y.im) #s(hole binary64 (* -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (* (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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (+ (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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/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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (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))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* y.im (+ (* y.im (* (pow y.re 2) (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 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)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (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)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (* (pow y.im 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 y.re 2)) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 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 y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 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 y.re 2)) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 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 y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (+ (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 2))) (* y.im (+ (* 1/12 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 2))) (* 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 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 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 y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/3 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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))))))) (* (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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (+ (* 1/3 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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/12 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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))) (+ (* -1 (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)))) (+ (* -1 (pow (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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 1)) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (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)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #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 (* 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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* 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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (* (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) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (- (/ (sin (* y.re (atan2 x.im x.re))) y.im) (* -1 (* (log x.im) (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (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))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #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))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* 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 (* 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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #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)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log x.im) (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (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))))) (/ (* 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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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 | |
|---|---|---|---|---|
| 41.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.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re 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 (* 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)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.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)))) (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)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im)) |
| 33.0ms | y.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.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re 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 (* 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)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.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)))) (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)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im)) |
| 30.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.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re 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 (* 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)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.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)))) (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)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im)) |
| 28.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.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re 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 (* 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)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.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)))) (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)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im)) |
| 28.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 (+ (* (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.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re 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 (* 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)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (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) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.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)))) (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)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im)) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 4836 | 98106 |
| 0 | 4978 | 90321 |
| 0 | 8453 | 87519 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
(*.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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.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)) |
(hypot.f64 x.re x.im) |
x.re |
x.im |
y.re |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))) |
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (hypot.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)) |
(*.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 (hypot.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 (hypot.f64 x.im x.re))) |
(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 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
#s(literal 2 binary64) |
(log.f64 (hypot.f64 x.im x.re)) |
(hypot.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)))) #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 (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 x.im))))))) |
(*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.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.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 x.im)))))) |
(/.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)) |
#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 (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 x.im))))) |
(-.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 x.im)))) |
(*.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 x.im))) |
(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 x.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))) (sin.f64 (/.f64 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re 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) |
(*.f64 x.im x.im) |
(sin.f64 (/.f64 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
(*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 y.re y.re) |
(-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) |
(pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) |
(log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) |
(pow.f64 (hypot.f64 x.im x.re) y.im) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
(-.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) |
(*.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 #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))))) |
(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 #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 (-.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 #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 (*.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 (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 #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 (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) |
(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))))) |
#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)))) |
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)) |
#s(literal 1/2 binary64) |
(/.f64 (*.f64 x.re x.re) x.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))) (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.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (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.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.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 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
(*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))) |
(+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) |
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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)))) #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 #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (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)))))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (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))) #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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (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))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (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))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (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 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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 (* (/ (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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (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 x.im)) #s(hole binary64 (* (log x.im) (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (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 (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (log x.im)) (* y.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.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))) (* (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))) #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))) (* (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))) #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))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (pow x.im 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (* (pow x.im 2) (pow y.re 2))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))) (* (pow x.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (* (pow x.im 2) (pow y.re 2))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))) (* (pow x.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (pow (log (pow x.im y.im)) 2))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (pow x.im 2)) (pow (log (pow x.im y.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 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/4 (/ (pow y.im 2) (pow x.im 4))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (pow (log (pow x.im y.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 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/4 (/ (pow y.im 2) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/360 (* (log (pow x.im y.im)) (+ (* -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 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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)))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (pow (log (pow x.im y.im)) 2)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.im y.im)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.im y.im))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (atan2 x.im x.re) 2) #s(hole binary64 (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 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)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/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 (- (+ (* 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)))))))) (* y.re (atan2 x.im x.re))))) |
#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 (* (* (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)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 x.im)) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im)))) |
#s(approx (/ (* x.re x.re) x.im) #s(hole binary64 (/ (pow x.re 2) x.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 (+ (* 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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.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 (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4))))))))))))) |
#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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im 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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.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.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.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.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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 y.re 2))) (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.re 6))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (* (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 (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im)))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.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 (+ (* -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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im 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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.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.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.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.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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 y.re 2))) (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.re 6))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.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/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 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 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.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/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (* (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 (+ (* (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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (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)))))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (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))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6)))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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 (* 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (log x.re)) (* y.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) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))) (* (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))) #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))) (* (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))) #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))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (pow x.re 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.re 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (* (pow x.re 2) (pow y.re 2))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))) (* (pow x.im 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (* (pow x.re 2) (pow y.re 2))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))) (* (pow x.im 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -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 y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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 y.re 2))))))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (pow (log (pow x.re y.im)) 2))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (pow x.re 2)) (pow (log (pow x.re y.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 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/4 (/ (pow y.im 2) (pow x.re 4))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (pow (log (pow x.re y.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 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/4 (/ (pow y.im 2) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/360 (* (log (pow x.re y.im)) (+ (* -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 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (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)))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (pow (log (pow x.re y.im)) 2)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.re y.im)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.re y.im))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/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 (- (+ (* 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)))))))) (* y.re (atan2 x.im x.re))))) |
#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)) #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 (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.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 (+ (* 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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (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.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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 (* 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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* y.im (* (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 x.im)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* 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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* 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 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4))))))))))))) |
#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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (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))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (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))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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 y.re 2))) (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.im 6))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (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 (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (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 (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (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 (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (* (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 (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (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 (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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (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) (* y.im (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #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.im x.im) (* x.re x.re))) #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 (* 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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -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 (/ (- (* (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)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (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)))) (* 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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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 (/ (- (* (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)))) (* 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 (/ (- (* (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)))) (* 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 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -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)))) (+ (* -1/2 (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (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)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (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)))) (* y.re (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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (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) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))))) |
#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))) #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))))) |
#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))) #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)))) (* (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))) #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))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (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))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (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))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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 y.re 2))) (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.im 6))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (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 (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (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 (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (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 (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.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.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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 y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.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/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 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 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.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/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (* (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 (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1))))) |
#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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -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.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* 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)))))) (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.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))))) (* y.re (+ (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* -1/6 (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 (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* 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)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 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)))))) (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.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))))) (* -1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #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 (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* 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 (* 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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* 1/2 (* y.im (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re)))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* 1/2 (* y.im (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* y.re (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* 1/2 (* y.im (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (log x.im) (sin (* 1/2 (PI)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re)))) (* (log x.im) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* (log x.im) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* (log x.im) (sin (* 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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)))) (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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)))) (* (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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (+ (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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/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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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))) #s(hole binary64 (+ (* -1 (* (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))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2)))) |
#s(approx (* y.re y.re) #s(hole binary64 (pow y.re 2))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (/ (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.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))))))) |
#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 (atan2 x.im x.re))) (* 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))))))) |
#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.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* 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)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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))))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 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))))) (* y.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 (* y.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 (* 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.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (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))) #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))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* -1 (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (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 (* -1 (* 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.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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* 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.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.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (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 (+ (* (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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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 (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* 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.re)) (* -1 (/ (atan2 x.im x.re) 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)))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (sin (* y.re (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 (* (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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (neg y.im) #s(hole binary64 (* -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (* (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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (+ (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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/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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (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)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (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))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 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 (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* y.im (+ (* y.im (* (pow y.re 2) (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 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)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (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)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (* (pow y.im 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 y.re 2)) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 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 y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 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 y.re 2)) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 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 y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (+ (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 2))) (* y.im (+ (* 1/12 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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 y.re 2))) (* 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 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 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 y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/3 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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))))))) (* (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 (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (+ (* 1/3 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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/12 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -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))) (+ (* -1 (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)))) (+ (* -1 (pow (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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 1)) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (- (* (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 (* (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)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #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 (* 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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* 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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (* (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) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (- (/ (sin (* y.re (atan2 x.im x.re))) y.im) (* -1 (* (log x.im) (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (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))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #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))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* 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 (* 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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #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)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log x.im) (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) 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 (- (* (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))))) (/ (* 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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #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 (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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.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 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.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))) (fma.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))))) |
(-.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)) |
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))) |
(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) (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 (neg.f64 x.im)) |
(hypot.f64 x.re (fabs.f64 x.im)) |
(hypot.f64 x.re x.im) |
x.re |
x.im |
y.re |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))) |
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (hypot.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)) |
(*.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 (hypot.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 (hypot.f64 x.im x.re))) |
(log.f64 (pow.f64 (hypot.f64 x.im x.re) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.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 (neg.f64 (PI.f64)) #s(literal -2 binary64)) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
#s(literal 2 binary64) |
(log.f64 (hypot.f64 x.im x.re)) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) |
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re)) |
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re)) |
(hypot.f64 (neg.f64 x.im) x.re) |
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re)) |
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re)) |
(hypot.f64 (fabs.f64 x.im) x.re) |
(hypot.f64 x.im (neg.f64 x.re)) |
(hypot.f64 x.im (fabs.f64 x.re)) |
(hypot.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.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.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 x.im))))))) |
(*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.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.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 x.im)))))) |
(/.f64 (neg.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (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)))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(pow.f64 (exp.f64 y.re) (log.f64 x.im)) |
(exp.f64 (*.f64 y.re (log.f64 x.im))) |
(+.f64 (cosh.f64 (*.f64 y.re (log.f64 x.im))) (sinh.f64 (*.f64 y.re (log.f64 x.im)))) |
(*.f64 y.re (log.f64 x.im)) |
(log.f64 (pow.f64 x.im y.re)) |
(log.f64 x.im) |
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 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)))) (-.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 x.im))))) |
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 x.im))))))) |
(-.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 x.im)))) |
(*.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 x.im))) |
(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 x.im)) |
(log.f64 (pow.f64 x.im (sin.f64 (fma.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.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))) (fma.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))))) |
(-.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)) |
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))) |
(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) (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 (neg.f64 x.im)) |
(hypot.f64 x.re (fabs.f64 x.im)) |
(hypot.f64 x.re 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 x.im x.im)) |
(*.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))) |
(*.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))) |
(sin.f64 (/.f64 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (neg.f64 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (neg.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
(*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 y.re) (neg.f64 y.re)) |
(*.f64 (fabs.f64 y.re) (fabs.f64 y.re)) |
(*.f64 y.re y.re) |
(pow.f64 y.re #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 y.re) #s(literal 2 binary64))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re))) (fma.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
(-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(/.f64 (neg.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (neg.f64 (*.f64 y.re y.re))) |
(/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) |
(*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
(*.f64 (*.f64 y.im y.im) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) |
(pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) #s(literal 2 binary64))) |
(*.f64 y.im (log.f64 (hypot.f64 x.im x.re))) |
(log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.im #s(literal 2 binary64))) |
(pow.f64 (hypot.f64 x.im x.re) y.im) |
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) |
(*.f64 (atan2.f64 x.im x.re) (atan2.f64 x.im x.re)) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (atan2.f64 x.im x.re)) #s(literal 2 binary64))) |
(/.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 (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (fma.f64 (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (*.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 (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) |
(*.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 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.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))))) |
(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)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.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 (neg.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)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)))) (neg.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 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.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 (/.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 (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 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.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 (-.f64 (pow.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.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 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))) (fma.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 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)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 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)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) |
(*.f64 (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))) |
(*.f64 (fabs.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (fabs.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))) |
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) |
(pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 2 binary64)) |
(*.f64 (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (fabs.f64 (*.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)) |
(pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) |
(/.f64 (-.f64 (pow.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) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.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 (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)) (fma.f64 (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.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 (*.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 (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) |
(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))))) |
#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)))) |
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)) |
#s(literal 1/2 binary64) |
(/.f64 (neg.f64 (*.f64 x.re x.re)) (neg.f64 x.im)) |
(/.f64 (*.f64 x.re x.re) x.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))) (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.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (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.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.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 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
(*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))) |
(+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) |
(/.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 y.im)) |
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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) (+.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)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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) (-.f64 (*.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) (-.f64 (*.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) |
#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 (*.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 (*.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 (*.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 y.im (*.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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (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 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (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 (*.f64 x.re x.re) (*.f64 y.im (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))) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 y.im (*.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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (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 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (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 (*.f64 x.re x.re) (*.f64 y.im (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))) (log (sqrt (+ (* x.im x.im) (* x.re 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)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.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 (sqrt (+ (* x.im x.im) (* x.re 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 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (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)))) (*.f64 x.im x.im))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (*.f64 x.re x.re) (+.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 x.im x.im))) (*.f64 (*.f64 x.re x.re) (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 (*.f64 x.re x.re) (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 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.im)) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.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.im x.im) (* x.re x.re)))) (+.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.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.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.im x.im) (* x.re x.re))) x.im) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.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.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.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 (* (/ (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)) (pow.f64 (exp.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) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (pow.f64 (exp.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 (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.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) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.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 x.im)) (*.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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)))))))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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))))))))))))))))))))))))) |
#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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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)))))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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)))))))))) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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))))))))))))))))))) |
#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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.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 (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.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 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (log.f64 x.im))) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.im (log.f64 x.im)))) (*.f64 y.re y.re) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.im (log.f64 x.im)))) (*.f64 y.re y.re) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)) (*.f64 y.re y.re)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/360 binary64) (*.f64 (*.f64 y.im (log.f64 x.im)) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (log.f64 x.im))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/720 binary64) (*.f64 (*.f64 x.re x.re) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 x.im y.im)) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 x.im y.im))) (*.f64 x.im x.im)) (pow.f64 x.im y.im))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im)))) (pow.f64 x.im y.im))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (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 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (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)))))) (pow.f64 x.im y.im)))))) (pow.f64 x.im y.im))) |
#s(approx (pow (atan2 x.im x.re) 2) (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 (*.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)) (-.f64 (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))) (*.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 (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)))))) (*.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 (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))))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#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 (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (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 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (log.f64 x.im))) (*.f64 x.im x.im)))) |
#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 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (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 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.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) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))) |
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) |
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))) |
#s(approx (/ (* x.re x.re) x.im) (/.f64 (*.f64 x.re x.re) 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) (*.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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) 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 (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.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 (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (fma.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)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.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)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (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.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 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)) (-.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 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 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 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 (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (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 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.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 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (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 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.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 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (neg.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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.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))))) (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 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.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))))) (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 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64)))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re))) x.re) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.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)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.im (*.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#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)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.im (*.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (neg.f64 (log.f64 x.re))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (neg.f64 (log.f64 x.re))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (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 y.im)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (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 y.im)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.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.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.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)) (-.f64 (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)))) (*.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 (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))))) (*.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 (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)))))) (*.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 (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)) (/.f64 x.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 #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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im 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.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im 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.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im 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.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (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.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) 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)) (-.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 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 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 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)) (*.f64 y.im (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 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)) (*.f64 y.im (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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.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 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)) (*.f64 y.im (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 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)) (*.f64 y.im (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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.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 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.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)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.im (*.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.im (*.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (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 y.im)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (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 y.im)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.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.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.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)) (-.f64 (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)))) (*.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 (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))))) (*.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 (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)))))) (*.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 (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(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 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im 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.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im 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.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im 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.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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) (+.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)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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))) (pow.f64 (exp.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) (-.f64 (*.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) (-.f64 (*.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) |
#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 (*.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 (*.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 (*.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 y.im (*.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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.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 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.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 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (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 (*.f64 x.im x.im) (*.f64 y.im (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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 y.im (*.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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.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 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.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 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (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 (*.f64 x.im x.im) (*.f64 y.im (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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re 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)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (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)))) (*.f64 x.re x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (*.f64 x.im x.im) (+.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 x.re x.re))) (*.f64 (*.f64 x.im x.im) (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 (*.f64 x.im x.im) (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 (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.re)) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.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.im x.im) (* x.re x.re)))) (+.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.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.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.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re)))) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.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.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.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 (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))))))))))))))) |
#s(approx (* x.im x.im) (*.f64 x.im x.im)) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.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 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.im (log.f64 x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (log.f64 x.re))) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re y.re) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re y.re) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)) (*.f64 y.re y.re)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/360 binary64) (*.f64 (*.f64 y.im (log.f64 x.re)) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (log.f64 x.re))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/720 binary64) (*.f64 (*.f64 x.im x.im) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 x.re y.im)) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 x.re y.im))) (*.f64 x.re x.re)) (pow.f64 x.re y.im))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im)))) (pow.f64 x.re y.im))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (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 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (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)))))) (pow.f64 x.re y.im)))))) (pow.f64 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 (*.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)) (-.f64 (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))) (*.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 (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)))))) (*.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 (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))))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#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 (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (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 (*.f64 y.im (log.f64 x.re)) (*.f64 y.im (log.f64 x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (log.f64 x.re))) (*.f64 x.re 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)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (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 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im 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) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re) (*.f64 x.im 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.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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im 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.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.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.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.re) (fma.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)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.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)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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)))) (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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)))) (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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 (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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)) (*.f64 y.im (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 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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)) (*.f64 y.im (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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.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 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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)) (*.f64 y.im (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 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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)) (*.f64 y.im (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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.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 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.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 (* (/ (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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.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 (exp.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 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) |
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) |
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 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 (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (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) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (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 x.im)) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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/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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.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)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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/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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.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)))) (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.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)))) (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.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 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (-.f64 (*.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 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.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/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (-.f64 (*.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 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.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/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 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)))) (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.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 y.im)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (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 y.im)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.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.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.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)) (-.f64 (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)))) (*.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 (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))))) (*.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 (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)))))) (*.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 (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) 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 (+ (* (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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) 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 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) 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.im (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) 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.im (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (*.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) 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)) (-.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 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 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 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)) (*.f64 y.im (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 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)) (*.f64 y.im (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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.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 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)) (*.f64 y.im (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 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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)) (*.f64 y.im (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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.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 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) |
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.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 (* (/ (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 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.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 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) |
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) |
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) |
#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)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.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)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/720 binary64) (/.f64 (*.f64 y.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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 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 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.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 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.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)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (-.f64 (*.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 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.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)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 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)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.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 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/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.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 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.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 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 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 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (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))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.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 y.im)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (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 y.im)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.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)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (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)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.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) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.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 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (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)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.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.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.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)) (-.f64 (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)))) (*.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 (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))))) (*.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 (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)))))) (*.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 (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 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 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 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 (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) 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 (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) 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.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) 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.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) |
#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 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.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.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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.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 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.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)))))) (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.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 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (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)))))) (atan2.f64 x.im x.re)))))) |
#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 (*.f64 y.re y.re) (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 (*.f64 y.re y.re) (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 (*.f64 y.re y.re) (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 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.re y.re) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.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 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.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 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (hypot.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 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.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 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (* 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))) (pow.f64 (exp.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 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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))) (pow.f64 (exp.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)))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.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)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) |
#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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) |
#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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #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)))) (+.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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #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)))) (+.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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.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 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (*.f64 y.re (-.f64 (atan2.f64 x.im x.re) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 #s(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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.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/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 #s(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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (*.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) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (*.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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (fma.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 x.im) (*.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 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (*.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#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 (log.f64 (hypot.f64 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#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))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) |
#s(approx (* y.re y.re) (*.f64 y.re y.re)) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 y.re y.re))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 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)) (log.f64 (pow.f64 (hypot.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)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.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)) (log.f64 (pow.f64 (hypot.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)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 (hypot.f64 x.im x.re))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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)))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.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))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.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 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 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))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 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 (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (log.f64 (hypot.f64 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 (+ (* 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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.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))) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (*.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.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 (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) 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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.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.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.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) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re)) (*.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) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) 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)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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)))) (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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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)))) (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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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)))) (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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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))) (pow.f64 (hypot.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))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.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))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.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))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.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)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.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 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.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 (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.f64 x.im x.re))))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin.f64 (*.f64 y.re (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))))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.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) (*.f64 #s(literal -1 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re))))))) |
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.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))) (-.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.re y.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (*.f64 (*.f64 y.im y.im) (/.f64 (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.re y.re)))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.re y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (*.f64 (*.f64 y.im y.im) (/.f64 (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.re y.re)))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.re y.re)))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.re y.re))))) |
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.re y.re))) (*.f64 y.im (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))))))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.re y.re))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 y.im (fma.f64 #s(literal 1/12 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) |
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(literal 1 binary64)) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.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 (log.f64 (pow.f64 (hypot.f64 x.im 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) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) |
#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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) |
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.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 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (*.f64 y.im (*.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) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im) (*.f64 #s(literal -1 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 (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.f64 x.im x.re)) (/.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) |
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (hypot.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 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.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 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im 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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im)) (*.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 (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.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 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
Compiled 226 506 to 10 851 computations (95.2% saved)
18 alts after pruning (15 fresh and 3 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 832 | 8 | 1 840 |
| Fresh | 2 | 7 | 9 |
| Picked | 3 | 2 | 5 |
| Done | 0 | 1 | 1 |
| Total | 1 837 | 18 | 1 855 |
| Status | Accuracy | Program |
|---|---|---|
| 32.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 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 69.5% | (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) #s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 33.7% | (*.f64 (exp.f64 (/.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)))) (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)))) | |
| 56.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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re y.im)))))))) | |
| 72.5% | (*.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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.im)))))))))) | |
| 74.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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 (hypot.f64 x.im x.re))))))) | |
| 60.2% | (*.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 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.f64 x.im x.re)))))))) | |
| 64.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))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.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 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))))))) | |
| 28.2% | (*.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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) | |
| ✓ | 14.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 (*.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 #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))))) |
| 21.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 (*.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))) #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 (atan2.f64 x.im x.re))))))) | |
| 16.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 #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)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.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))))) | |
| 17.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 #s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) | |
| 33.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 #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))) #s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) | |
| 24.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 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) | |
| ✓ | 55.7% | (*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
| 16.1% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 x.im)))))))))) | |
| ✓ | 27.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.im))) (exp.f64 (*.f64 y.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.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 x.im))))))) |
Compiled 5 370 to 1 265 computations (76.4% 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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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))) (*.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 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))))))))) |
(*.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 (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)))))) |
(*.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 (+ (* (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))))) |
(*.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 #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)))) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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 (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 #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))) #s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 #s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.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))) #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 (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 (*.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 #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 (*.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 (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.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 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.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 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 (hypot.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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) 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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re 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))) (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.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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))) (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 (*.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)))) (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 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) #s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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 (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 #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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
(*.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 #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 #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 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (/.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.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 (hypot.f64 x.re x.im)) y.re) (*.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 (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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))) |
5 calls:
| 12.0ms | y.im |
| 12.0ms | x.im |
| 12.0ms | x.re |
| 12.0ms | y.re |
| 11.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 |
|---|---|---|
| 82.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)))) |
| 84.7% | 2 | x.re |
| 82.6% | 1 | x.im |
| 82.6% | 1 | y.re |
| 82.6% | 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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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))) (*.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 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))))))))) |
(*.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 (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)))))) |
(*.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 (+ (* (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))))) |
(*.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 #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)))) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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 (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 #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))) #s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 #s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.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))) #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 (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 (*.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 #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 (*.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 (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.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 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.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 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 (hypot.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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) 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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re 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))) (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.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
| 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 (hypot.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))) (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.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) 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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))) |
5 calls:
| 10.0ms | y.im |
| 10.0ms | y.re |
| 10.0ms | x.re |
| 10.0ms | x.im |
| 8.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 |
|---|---|---|
| 84.8% | 3 | y.im |
| 81.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)))) |
| 81.7% | 1 | x.im |
| 85.5% | 3 | y.re |
| 81.7% | 1 | x.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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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))) (*.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 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))))))))) |
(*.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 (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)))))) |
(*.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 (+ (* (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))))) |
(*.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 #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)))) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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 (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 #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))) #s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 #s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.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))) #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 (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 (*.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 #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 (*.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 (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.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 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.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 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 (hypot.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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) 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))) (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.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re y.im)))))))) |
| 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 (hypot.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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))) |
1 calls:
| 10.0ms | y.re |
| Accuracy | Segments | Branch |
|---|---|---|
| 83.7% | 2 | 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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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))) (*.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 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))))))))) |
(*.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 (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)))))) |
(*.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 (+ (* (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))))) |
(*.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 #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)))) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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 (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 #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))) #s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 #s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.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))) #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 (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 (*.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 #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 (*.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 (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.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 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.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 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.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 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (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 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.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 (hypot.f64 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))) #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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))) |
2 calls:
| 9.0ms | y.im |
| 9.0ms | y.re |
| Accuracy | Segments | Branch |
|---|---|---|
| 81.7% | 1 | y.im |
| 81.7% | 1 | y.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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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))) (*.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 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))))))))) |
(*.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 (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)))))) |
(*.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 (+ (* (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))))) |
(*.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 #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)))) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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 (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 #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))) #s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 #s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.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))) #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 (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 (*.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 #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 (*.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 (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.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 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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 (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.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 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.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)))))))) |
5 calls:
| 9.0ms | y.re |
| 9.0ms | x.re |
| 9.0ms | y.im |
| 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 |
|---|---|---|
| 67.4% | 2 | x.im |
| 70.5% | 3 | x.re |
| 74.7% | 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)))) |
| 73.2% | 3 | y.im |
| 81.3% | 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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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))) (*.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 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))))))))) |
(*.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 (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)))))) |
(*.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 (+ (* (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))))) |
(*.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 #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)))) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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 (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 #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))) #s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 #s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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 #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)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.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))) #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 (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 (*.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 #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 (*.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 (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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 (hypot.f64 x.im x.re)) (/.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 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.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 (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:
| 9.0ms | y.re |
| 9.0ms | y.im |
| 8.0ms | x.re |
| 8.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 |
|---|---|---|
| 63.2% | 2 | x.im |
| 64.3% | 3 | x.re |
| 63.2% | 3 | y.im |
| 63.6% | 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)))) |
| 61.5% | 2 | 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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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))) (*.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 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))))))))) |
(*.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 (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)))))) |
(*.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 (+ (* (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))))) |
(*.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 #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)))) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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 (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))) (sin.f64 (+.f64 (*.f64 #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)))) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.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 |
|---|---|---|
| 63.2% | 2 | x.im |
| 63.1% | 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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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))) (*.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 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))))))))) |
(*.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 (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)))))) |
(*.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 (+ (* (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))))) |
(*.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 #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)))) 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 |
|---|---|---|
| 63.1% | 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)))) |
| 63.6% | 3 | 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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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))) (*.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 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))))))))) |
(*.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 (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)))))) |
| 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))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
2 calls:
| 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 |
|---|---|---|
| 61.7% | 2 | x.re |
| 62.7% | 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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 (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 #s(approx (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) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 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)))) (fma.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 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(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 (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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.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)))))) |
(*.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 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 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)))))))))))) (*.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)))))) |
(*.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) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.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 |
|---|
(*.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))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.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) (* (atan2 x.im 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:
| 4.0ms | x.re |
| 4.0ms | x.im |
| 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 |
|---|---|---|
| 61.7% | 2 | x.re |
| 58.3% | 2 | x.im |
| 55.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)))) |
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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) |
| 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)))))) |
5 calls:
| 3.0ms | y.im |
| 3.0ms | x.re |
| 3.0ms | x.im |
| 3.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 |
|---|---|---|
| 41.3% | 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)))) |
| 45.1% | 3 | x.im |
| 33.2% | 2 | y.re |
| 35.0% | 3 | y.im |
| 44.2% | 2 | x.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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)))) (*.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:
| 2.0ms | x.re |
| 2.0ms | x.im |
| 2.0ms | y.re |
| 2.0ms | y.im |
| 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 |
|---|---|---|
| 28.5% | 1 | y.re |
| 28.5% | 1 | y.im |
| 28.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)))) |
| 28.5% | 1 | x.im |
| 28.5% | 1 | x.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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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.im))) (exp.f64 (*.f64 y.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.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.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 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.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 x.im))) (*.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 x.im))) (*.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 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 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 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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))))))) |
| 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)))) #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 (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 x.im))))))) |
5 calls:
| 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)))) |
| 2.0ms | y.re |
| 2.0ms | x.re |
| 2.0ms | y.im |
| 2.0ms | x.im |
| Accuracy | Segments | Branch |
|---|---|---|
| 27.8% | 1 | x.im |
| 27.8% | 1 | y.re |
| 27.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)))) |
| 27.8% | 1 | x.re |
| 27.8% | 1 | y.im |
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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (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)))) (*.f64 #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))) (pow.f64 (exp.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)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
5 calls:
| 1.0ms | y.im |
| 1.0ms | x.im |
| 1.0ms | x.re |
| 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 |
|---|---|---|
| 23.2% | 1 | x.im |
| 23.2% | 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)))) |
| 23.2% | 1 | y.re |
| 23.2% | 1 | x.re |
| 23.2% | 1 | y.im |
Compiled 41 to 35 computations (14.6% saved)
| 1× | binary-search |
| 1× | predicate-same |
| Time | Left | Right |
|---|---|---|
| 7.0ms | 1.0716092038833835e-55 | 3.3404209770071802e-46 |
| 3.0ms | 8× | 1 | valid |
| 3.0ms | 24× | 0 | valid |
Compiled 204 to 127 computations (37.7% saved)
ival-hypot: 1.0ms (23.6% of total)ival-mult!: 1.0ms (23.6% of total)ival-log: 1.0ms (23.6% of total)adjust: 0.0ms (0% of total)ival-exp: 0.0ms (0% of total)ival-add!: 0.0ms (0% of total)ival-atan2: 0.0ms (0% of total)ival-sub!: 0.0ms (0% of total)ival-sin: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | predicate-same |
| Time | Left | Right |
|---|---|---|
| 33.0ms | 2.8374351481302546e-226 | 1.9907966288653178e-214 |
| 17.0ms | -281369164.28350365 | -6695451.7962575285 |
| 20.0ms | 66× | 1 | valid |
| 19.0ms | 174× | 0 | valid |
Compiled 1 590 to 1 003 computations (36.9% saved)
ival-mult!: 7.0ms (22.2% of total)ival-hypot: 6.0ms (19.1% of total)ival-log: 5.0ms (15.9% of total)ival-sin: 5.0ms (15.9% of total)ival-atan2: 3.0ms (9.5% of total)adjust: 2.0ms (6.4% of total)ival-exp: 2.0ms (6.4% of total)ival-add!: 1.0ms (3.2% of total)ival-sub!: 1.0ms (3.2% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 22.0ms | -6.655228839320073e-26 | -1.4528159790654805e-26 |
| 9.0ms | 24× | 1 | valid |
| 8.0ms | 72× | 0 | valid |
Compiled 718 to 443 computations (38.3% saved)
ival-mult!: 3.0ms (21.4% of total)ival-sub!: 3.0ms (21.4% of total)ival-hypot: 2.0ms (14.3% of total)ival-log: 2.0ms (14.3% of total)ival-sin: 2.0ms (14.3% of total)adjust: 1.0ms (7.1% of total)ival-exp: 1.0ms (7.1% of total)ival-atan2: 1.0ms (7.1% of total)ival-add!: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | predicate-same |
| Time | Left | Right |
|---|---|---|
| 30.0ms | 2.722531120427203e+86 | 1.3137808066325967e+87 |
| 7.0ms | -2.5180157729595887e+32 | -4.166573931151355e+20 |
| 16.0ms | 53× | 1 | valid |
| 8.0ms | 12× | 2 | valid |
| 7.0ms | 63× | 0 | valid |
Compiled 1 536 to 873 computations (43.2% saved)
ival-sin: 6.0ms (23.3% of total)ival-hypot: 4.0ms (15.5% of total)ival-mult!: 4.0ms (15.5% of total)ival-log: 4.0ms (15.5% of total)adjust: 3.0ms (11.6% of total)ival-atan2: 2.0ms (7.8% of total)ival-exp: 1.0ms (3.9% of total)ival-add!: 0.0ms (0% of total)ival-sub!: 0.0ms (0% of total)| 1× | left-value |
| Time | Left | Right |
|---|---|---|
| 0.0ms | +inf | NaN |
Compiled 40 to 26 computations (35% saved)
| 1× | binary-search |
| 1× | predicate-same |
| Time | Left | Right |
|---|---|---|
| 23.0ms | -6.198997359869118e-307 | 1.293112421682029e-304 |
| 13.0ms | 45× | 1 | valid |
| 6.0ms | 51× | 0 | valid |
Compiled 538 to 359 computations (33.3% saved)
ival-hypot: 3.0ms (19% of total)ival-mult!: 3.0ms (19% of total)ival-log: 3.0ms (19% of total)ival-sin: 3.0ms (19% of total)adjust: 2.0ms (12.7% of total)ival-exp: 1.0ms (6.3% of total)ival-atan2: 1.0ms (6.3% of total)ival-add!: 0.0ms (0% of total)ival-sub!: 0.0ms (0% of total)| 1× | left-value |
| Time | Left | Right |
|---|---|---|
| 0.0ms | +inf | NaN |
Compiled 40 to 26 computations (35% saved)
| 1× | left-value |
| Time | Left | Right |
|---|---|---|
| 0.0ms | +inf | NaN |
Compiled 40 to 26 computations (35% saved)
| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 22.0ms | 5.390959193721723e-167 | 1.7915650887903498e-165 |
| 9.0ms | 84× | 0 | valid |
| 9.0ms | 28× | 1 | valid |
Compiled 1 076 to 604 computations (43.9% saved)
ival-hypot: 3.0ms (21.6% of total)ival-mult!: 3.0ms (21.6% of total)ival-log: 2.0ms (14.4% of total)ival-sin: 2.0ms (14.4% of total)adjust: 1.0ms (7.2% of total)ival-exp: 1.0ms (7.2% of total)ival-atan2: 1.0ms (7.2% of total)ival-add!: 0.0ms (0% of total)ival-sub!: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 30.0ms | 6.248277996965726e-274 | 7.261475354756179e-271 |
| 14.0ms | 46× | 1 | valid |
| 11.0ms | 82× | 0 | valid |
Compiled 1 016 to 535 computations (47.3% saved)
ival-hypot: 5.0ms (24.4% of total)ival-mult!: 4.0ms (19.5% of total)ival-log: 3.0ms (14.6% of total)ival-sin: 3.0ms (14.6% of total)adjust: 2.0ms (9.8% of total)ival-atan2: 2.0ms (9.8% of total)ival-exp: 1.0ms (4.9% of total)ival-add!: 0.0ms (0% of total)ival-sub!: 0.0ms (0% of total)| 1× | fuel |
Compiled 1 790 to 230 computations (87.2% saved)
Compiled 3 654 to 498 computations (86.4% saved)
Loading profile data...