
Time bar (total: 8.5s)
| 1× | search |
| Probability | Valid | Unknown | Precondition | Infinite | Domain | Can't | Iter |
|---|---|---|---|---|---|---|---|
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 0 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 1 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 2 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 3 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 4 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 5 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 6 |
| 18.8% | 18.7% | 81.1% | 0.2% | 0.0% | 0.0% | 0.0% | 7 |
| 18.8% | 18.7% | 81.1% | 0.2% | 0.0% | 0.0% | 0.0% | 8 |
| 18.8% | 18.7% | 81.1% | 0.2% | 0.0% | 0.0% | 0.0% | 9 |
| 34.4% | 34.3% | 65.5% | 0.2% | 0.0% | 0.0% | 0.0% | 10 |
| 54.7% | 54.6% | 45.2% | 0.2% | 0.0% | 0.0% | 0.0% | 11 |
| 54.7% | 54.6% | 45.2% | 0.2% | 0.0% | 0.0% | 0.0% | 12 |
Compiled 39 to 18 computations (53.8% saved)
| 1.8s | 2 994× | 1 | valid |
| 869.0ms | 5 262× | 0 | valid |
ival-cos: 837.0ms (36.9% of total)ival-hypot: 354.0ms (15.6% of total)ival-log: 307.0ms (13.5% of total)ival-mult!: 306.0ms (13.5% of total)ival-atan2: 168.0ms (7.4% of total)adjust: 159.0ms (7.0% of total)ival-exp: 82.0ms (3.6% of total)ival-add!: 32.0ms (1.4% of total)ival-sub!: 25.0ms (1.1% of total)Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 141 | 571 |
| 1 | 661 | 554 |
| 2 | 2992 | 554 |
| 1× | node-limit |
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 40.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))) (cos.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 |
|---|
| Outputs |
|---|
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1582 | 20797 |
| 1× | iter-limit |
| Inputs |
|---|
x.re |
(*.f64 x.re x.re) |
x.im |
(*.f64 x.im x.im) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
y.re |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(atan2.f64 x.im x.re) |
y.im |
(*.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)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (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.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)) |
(cos.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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
#s(approx x.re x.re) |
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))) |
#s(approx (atan2 x.im x.re) (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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 x.im x.im) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx y.re y.re) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (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 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (+ (* (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 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx y.im y.im) |
#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.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
12 calls:
| Time | Variable | Point |
|---|---|---|
| 68.0ms | y.re | 0 |
| 23.0ms | y.re | inf |
| 15.0ms | y.im | 0 |
| 13.0ms | x.re | -inf |
| 11.0ms | x.im | inf |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 19 | 176 |
| 0 | 34 | 176 |
| 1 | 139 | 174 |
| 2 | 603 | 174 |
| 3 | 2880 | 174 |
| 0 | 4578 | 174 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
x.re |
(*.f64 x.re x.re) |
x.im |
(*.f64 x.im x.im) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
y.re |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(atan2.f64 x.im x.re) |
y.im |
(*.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)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (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.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)) |
(cos.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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
x.re |
(*.f64 (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.re))) (neg.f64 (neg.f64 (fabs.f64 x.re)))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re)) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re)) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re) |
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re))) |
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re)) |
(*.f64 (neg.f64 x.re) (neg.f64 x.re)) |
(*.f64 x.re x.re) |
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(neg.f64 (*.f64 (neg.f64 x.re) x.re)) |
(sqrt.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) |
(fabs.f64 (*.f64 (neg.f64 x.re) x.re)) |
(fabs.f64 (*.f64 x.re x.re)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) |
x.im |
(*.f64 (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.im))) (neg.f64 (neg.f64 (fabs.f64 x.im)))) |
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.im))) (fabs.f64 x.im)) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im)) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im)) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im) |
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im))) |
(*.f64 (fabs.f64 x.im) (neg.f64 (neg.f64 (fabs.f64 x.im)))) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) |
(pow.f64 x.im #s(literal 2 binary64)) |
(neg.f64 (*.f64 (neg.f64 x.im) x.im)) |
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) |
(fabs.f64 (*.f64 (neg.f64 x.im) x.im)) |
(fabs.f64 (*.f64 x.im x.im)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) |
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64)) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (-.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))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(neg.f64 (+.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.im) x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.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.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(sqrt.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(fabs.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 (fabs.f64 x.re))) (fabs.f64 x.re))) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
y.re |
(*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (log.f64 (exp.f64 y.re))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) |
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) |
(atan2.f64 x.im x.re) |
(neg.f64 (neg.f64 (atan2.f64 x.im x.re))) |
y.im |
(*.f64 (neg.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) |
(*.f64 (neg.f64 y.im) (neg.f64 (atan2.f64 x.im x.re))) |
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.im)) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(*.f64 (atan2.f64 x.im x.re) (neg.f64 (neg.f64 y.im))) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(-.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 (neg.f64 y.re) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(*.f64 (sqrt.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (sqrt.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(*.f64 (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) |
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(pow.f64 (exp.f64 (*.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal -1 binary64)) |
(/.f64 (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (-.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (+.f64 (pow.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) |
(/.f64 (-.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) #s(literal 4 binary64)) |
(/.f64 (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) #s(literal 1 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (neg.f64 (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (neg.f64 (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(neg.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(-.f64 (+.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(-.f64 (+.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(-.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(-.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(-.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (neg.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(-.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(sqrt.f64 (exp.f64 (*.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) |
(fabs.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(fabs.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (cosh.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (sinh.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (+.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (+.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (/.f64 (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) |
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im)) |
(*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) |
(*.f64 (neg.f64 y.re) (neg.f64 (atan2.f64 x.im x.re))) |
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) |
(*.f64 (atan2.f64 x.im x.re) (neg.f64 (neg.f64 y.re))) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (+.f64 (*.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (neg.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) y.im)) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) |
(neg.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
(sin.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal -1/2 binary64)))) |
(sin.f64 (+.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 1 binary64))) |
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (-.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(+.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) |
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(*.f64 (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (-.f64 (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))) |
(/.f64 (neg.f64 (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(neg.f64 (*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (neg.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
Compiled 43 350 to 4 094 computations (90.6% saved)
17 alts after pruning (17 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 512 | 17 | 529 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 0 | 1 |
| Done | 0 | 0 | 0 |
| Total | 513 | 17 | 530 |
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 40.7% | (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
| ▶ | 26.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 40.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))) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))))) | |
| 39.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) | |
| 41.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 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) | |
| 16.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))) | |
| 36.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) | |
| 44.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))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) | |
| ▶ | 61.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
| ▶ | 41.0% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 36.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.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)))) | |
| 32.9% | (*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 37.6% | (*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 28.2% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.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.5% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (cos.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)))) | |
| ▶ | 50.1% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
| 28.6% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
Compiled 2 244 to 1 044 computations (53.5% saved)
| Inputs |
|---|
2 |
-1 |
1/2 |
| Outputs |
|---|
#s(literal 2 binary64) |
#s(literal -1 binary64) |
#s(literal 1/2 binary64) |
| 0.0ms | 1× | 0 | valid |
Compiled 5 to 5 computations (0.0% saved)
adjust: 0.0ms (0.0% of total)Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 5402 | 151163 |
| 1× | iter-limit |
| Inputs |
|---|
x.re |
(*.f64 x.re x.re) |
x.im |
(*.f64 x.im x.im) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
y.re |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(atan2.f64 x.im x.re) |
y.im |
(*.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)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (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 y.re (atan2.f64 x.im x.re)) |
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(literal 2 binary64) |
(pow.f64 x.im #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re) |
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(literal -1 binary64) |
(*.f64 #s(literal -1 binary64) x.re) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)) |
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) |
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) |
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) 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 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
#s(literal 1/2 binary64) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) |
(-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) |
(+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
#s(approx x.re x.re) |
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))) |
#s(approx (atan2 x.im x.re) (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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))) |
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))))))))) |
#s(approx (* -1 x.re) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.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 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.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 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.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 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.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 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx x.im x.im) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.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 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.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 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im))))) (pow.f64 x.im #s(literal 6 binary64)))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.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 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.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 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))))) |
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx y.re y.re) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (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 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.re (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.re (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)) (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.re (-.f64 (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (+ (* (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 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* 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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx 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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (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) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/48 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 y.im (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 y.im (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) |
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))) |
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) |
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))))))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #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.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.im)) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 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 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.im)))))) |
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* 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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
12 calls:
| Time | Variable | Point |
|---|---|---|
| 150.0ms | y.re | 0 |
| 73.0ms | x.im | 0 |
| 72.0ms | x.im | inf |
| 51.0ms | y.im | 0 |
| 50.0ms | x.re | inf |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 76 | 953 |
| 0 | 129 | 781 |
| 1 | 528 | 772 |
| 2 | 2127 | 772 |
| 0 | 4042 | 772 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
x.re |
(*.f64 x.re x.re) |
x.im |
(*.f64 x.im x.im) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
y.re |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(atan2.f64 x.im x.re) |
y.im |
(*.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)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (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 y.re (atan2.f64 x.im x.re)) |
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(literal 2 binary64) |
(pow.f64 x.im #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re) |
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(literal -1 binary64) |
(*.f64 #s(literal -1 binary64) x.re) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)) |
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) |
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) |
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) 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 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
#s(literal 1/2 binary64) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) |
(-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) |
(+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
x.re |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re)) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re)) |
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 2 binary64)) (*.f64 x.re x.re)) |
(*.f64 (*.f64 (neg.f64 x.re) #s(literal -1 binary64)) x.re) |
(*.f64 (fabs.f64 (fabs.f64 x.re)) (fabs.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re) |
(*.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 x.re x.re)) |
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re)) |
(*.f64 (neg.f64 x.re) (neg.f64 x.re)) |
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 x.re) x.re)) |
(*.f64 (*.f64 x.re x.re) (pow.f64 #s(literal -1 binary64) #s(literal 2 binary64))) |
(*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) |
(*.f64 x.re (*.f64 #s(literal -1 binary64) (neg.f64 x.re))) |
(*.f64 x.re x.re) |
(pow.f64 (fabs.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal -1 binary64))) |
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal -1 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.re) x.re)) |
(fabs.f64 (*.f64 x.re x.re)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) |
x.im |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im)) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im)) |
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im))) |
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im))) |
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im) |
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 x.im #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.im) x.im)) |
(fabs.f64 (*.f64 x.im x.im)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.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.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) |
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))))) |
(/.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))))) |
(neg.f64 (-.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) |
(-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) |
(-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) |
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(exp.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 #s(literal 1/2 binary64)))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64))) |
(-.f64 (log.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 4 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (log.f64 #s(literal 4 binary64))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
y.re |
(*.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) (log.f64 (exp.f64 y.re))) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.re) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) |
(*.f64 y.re (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(atan2.f64 x.im x.re) |
y.im |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re))) |
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))) #s(literal -1 binary64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(pow.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -2 binary64)) #s(literal 1/2 binary64)) |
(pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -1 binary64)) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) |
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))) |
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(-.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(sqrt.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -2 binary64))) |
(fabs.f64 (neg.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) |
(fabs.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(exp.f64 (*.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal -1 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) #s(literal -1 binary64))) |
(exp.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (fabs.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
#s(literal 2 binary64) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im)) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im)) |
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im))) |
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im))) |
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im) |
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 x.im #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.im) x.im)) |
(fabs.f64 (*.f64 x.im x.im)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re)) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re)) |
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 2 binary64)) (*.f64 x.re x.re)) |
(*.f64 (*.f64 (neg.f64 x.re) #s(literal -1 binary64)) x.re) |
(*.f64 (fabs.f64 (fabs.f64 x.re)) (fabs.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re) |
(*.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 x.re x.re)) |
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re)) |
(*.f64 (neg.f64 x.re) (neg.f64 x.re)) |
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 x.re) x.re)) |
(*.f64 (*.f64 x.re x.re) (pow.f64 #s(literal -1 binary64) #s(literal 2 binary64))) |
(*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) |
(*.f64 x.re (*.f64 #s(literal -1 binary64) (neg.f64 x.re))) |
(*.f64 x.re x.re) |
(pow.f64 (fabs.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal -1 binary64))) |
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal -1 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.re) x.re)) |
(fabs.f64 (*.f64 x.re x.re)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.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.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) |
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))))) |
(/.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))))) |
(neg.f64 (-.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) |
(-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) |
(-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) |
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(exp.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) |
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) |
(fabs.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re))) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))) |
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (cosh.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) |
#s(literal -1 binary64) |
(*.f64 #s(literal -1 binary64) x.re) |
(*.f64 x.re #s(literal -1 binary64)) |
(neg.f64 x.re) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) |
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) |
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) (log.f64 (exp.f64 y.re))) |
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) |
(*.f64 y.re (log.f64 (exp.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))))) |
(*.f64 y.re (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))) |
(log.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) |
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))) |
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)) |
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) |
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(pow.f64 (pow.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))) #s(literal -1 binary64)) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)))) |
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (neg.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re)) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)))) |
(/.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(-.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)))) |
(sqrt.f64 (pow.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) #s(literal 2 binary64))) |
(fabs.f64 (neg.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) |
(fabs.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) |
(*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))) |
(log.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.im)) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) |
(/.f64 (-.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))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) |
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) 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))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) 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))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (-.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))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(neg.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))) y.im)) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) |
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) |
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)) |
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (cos.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))) |
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))) |
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))) |
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))) |
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) |
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) |
(cos.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) |
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) |
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) |
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))) y.im))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))) y.im)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 y.im) (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 y.im) (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) |
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) |
#s(literal 1/2 binary64) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.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.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 #s(literal 1/2 binary64)))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64))) |
(-.f64 (log.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 4 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (log.f64 #s(literal 4 binary64))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.im) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.im)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im)) |
(*.f64 y.im (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.im))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(neg.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(neg.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (PI.f64))) |
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (PI.f64))) |
(sin.f64 (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64))) |
(cos.f64 (+.f64 (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) (PI.f64)) (PI.f64))) |
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (PI.f64))) |
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (PI.f64)) (PI.f64))) |
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(*.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) (log.f64 (exp.f64 y.re))) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.re) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) |
(*.f64 y.re (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (*.f64 (log.f64 (+.f64 (*.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)) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re))) |
(-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) |
(pow.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 1 binary64)) |
(pow.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) #s(literal -1 binary64)) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(/.f64 (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) |
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(/.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(-.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(sqrt.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 2 binary64))) |
(fabs.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))) |
(fabs.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) |
(exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(*.f64 (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))) |
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))) |
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) |
(neg.f64 (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))) |
(neg.f64 (/.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))) |
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))) |
(+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal -2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) |
(cosh.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(cosh.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(cosh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(+.f64 (/.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) |
(*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) |
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal -2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) |
(sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(-.f64 (/.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) |
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))))) |
(/.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))))) |
(neg.f64 (-.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) |
(-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) |
(-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) |
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(exp.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 #s(literal 1/2 binary64)))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64))) |
(-.f64 (log.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 4 binary64))) |
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (log.f64 #s(literal 4 binary64))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) (log.f64 (exp.f64 y.re))) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.re) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) |
(*.f64 y.re (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re))) |
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))) #s(literal -1 binary64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(pow.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -2 binary64)) #s(literal 1/2 binary64)) |
(pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -1 binary64)) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) |
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))) |
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(-.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(sqrt.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -2 binary64))) |
(fabs.f64 (neg.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) |
(fabs.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(exp.f64 (*.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal -1 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) #s(literal -1 binary64))) |
(exp.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.im) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.im)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im)) |
(*.f64 y.im (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.im))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(neg.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(neg.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (PI.f64))) |
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (PI.f64))) |
(sin.f64 (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64))) |
(cos.f64 (+.f64 (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) (PI.f64)) (PI.f64))) |
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (PI.f64))) |
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (PI.f64)) (PI.f64))) |
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))) |
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))) |
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) |
(neg.f64 (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))) |
(neg.f64 (/.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))) |
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))) |
(+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
Compiled 233 111 to 12 057 computations (94.8% saved)
23 alts after pruning (23 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 469 | 17 | 1 486 |
| Fresh | 6 | 6 | 12 |
| Picked | 5 | 0 | 5 |
| Done | 0 | 0 | 0 |
| Total | 1 480 | 23 | 1 503 |
| Status | Accuracy | Program |
|---|---|---|
| 27.5% | (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) | |
| 37.4% | (*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) | |
| 23.9% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 40.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))) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))))) | |
| 41.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 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) | |
| ▶ | 60.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
| ▶ | 62.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| 41.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) | |
| 18.7% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 43.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) | |
| 36.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.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)))) | |
| 32.9% | (*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 37.6% | (*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| ▶ | 28.2% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.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.4% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) | |
| 50.1% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 48.6% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) | |
| 51.3% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) | |
| 47.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) | |
| 44.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) | |
| 21.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) | |
| ▶ | 30.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
| ▶ | 51.7% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
Compiled 2 882 to 1 432 computations (50.3% saved)
| Inputs |
|---|
1 |
2 |
-1 |
(PI) |
1/2 |
(* (PI) 1/2) |
| Outputs |
|---|
#s(literal 1 binary64) |
#s(literal 2 binary64) |
#s(literal -1 binary64) |
#s(literal 884279719003555/281474976710656 binary64) |
#s(literal 1/2 binary64) |
#s(literal 884279719003555/562949953421312 binary64) |
| 0.0ms | 1× | 0 | valid |
Compiled 10 to 8 computations (20.0% saved)
adjust: 0.0ms (0.0% of total)Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1982 | 25313 |
| 1× | iter-limit |
| Inputs |
|---|
x.re |
(*.f64 x.re x.re) |
x.im |
(*.f64 x.im x.im) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
y.re |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(atan2.f64 x.im x.re) |
y.im |
(*.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)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (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(literal 1 binary64) |
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
#s(literal 2 binary64) |
(pow.f64 x.im #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re) |
(*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(literal -1 binary64) |
(/.f64 #s(literal -1 binary64) x.re) |
(log.f64 (/.f64 #s(literal -1 binary64) x.re)) |
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
(exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
(neg.f64 y.re) |
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) |
(PI.f64) |
#s(literal 1/2 binary64) |
(*.f64 (PI.f64) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #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))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) 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) |
(+.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)) |
(cos.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 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
#s(approx x.re x.re) |
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))) |
#s(approx (atan2 x.im x.re) (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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))))))))) |
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (/ -1 x.re) (/.f64 #s(literal -1 binary64) x.re)) |
#s(approx (log (/ -1 x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (neg.f64 x.re)))) |
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 x.re))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re)))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)) |
#s(approx (* (neg y.re) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (log (/ -1 x.re)) (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (log (/ -1 x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) |
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx x.im x.im) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx y.re y.re) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (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 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) |
#s(approx (neg y.re) (*.f64 #s(literal -1 binary64) y.re)) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/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))))))))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 y.re (+.f64 (*.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) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re)) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx 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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (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) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
12 calls:
| Time | Variable | Point |
|---|---|---|
| 124.0ms | x.re | 0 |
| 46.0ms | y.re | inf |
| 33.0ms | y.re | 0 |
| 19.0ms | y.re | -inf |
| 15.0ms | x.re | -inf |
Useful iterations: 2 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 74 | 673 |
| 0 | 114 | 663 |
| 1 | 334 | 641 |
| 2 | 1172 | 637 |
| 0 | 4105 | 637 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
x.re |
(*.f64 x.re x.re) |
x.im |
(*.f64 x.im x.im) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
y.re |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(atan2.f64 x.im x.re) |
y.im |
(*.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)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (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(literal 1 binary64) |
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
#s(literal 2 binary64) |
(pow.f64 x.im #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re) |
(*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(literal -1 binary64) |
(/.f64 #s(literal -1 binary64) x.re) |
(log.f64 (/.f64 #s(literal -1 binary64) x.re)) |
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
(exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
(neg.f64 y.re) |
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) |
(PI.f64) |
#s(literal 1/2 binary64) |
(*.f64 (PI.f64) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #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))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) 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) |
(+.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)) |
(cos.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 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
x.re |
(*.f64 (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.re))) (neg.f64 (neg.f64 (fabs.f64 x.re)))) |
(*.f64 (neg.f64 (neg.f64 (neg.f64 x.re))) (neg.f64 (neg.f64 (neg.f64 x.re)))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re)) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re)) |
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re) |
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re)) |
(*.f64 (neg.f64 x.re) (neg.f64 x.re)) |
(*.f64 x.re x.re) |
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) x.re)) |
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.re) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.re) x.re)) |
(sqrt.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) |
(fabs.f64 (*.f64 (neg.f64 x.re) x.re)) |
(fabs.f64 (*.f64 x.re x.re)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) |
x.im |
(*.f64 (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.im))) (neg.f64 (neg.f64 (fabs.f64 x.im)))) |
(*.f64 (neg.f64 (neg.f64 (neg.f64 x.im))) (neg.f64 (neg.f64 (neg.f64 x.im)))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im)) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im)) |
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im))) |
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im) |
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) |
(pow.f64 x.im #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.im) x.im)) |
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) |
(fabs.f64 (*.f64 (neg.f64 x.im) x.im)) |
(fabs.f64 (*.f64 x.im x.im)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) |
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64)) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.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.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(sqrt.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(fabs.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
y.re |
(*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (log.f64 (exp.f64 y.re))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) |
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) |
(atan2.f64 x.im x.re) |
y.im |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))) (+.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)) |
(-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 (sqrt.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) (sqrt.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(pow.f64 (exp.f64 (*.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal -1 binary64)) |
(/.f64 (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (-.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (+.f64 (pow.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (-.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (exp.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))) |
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (exp.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(-.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(sqrt.f64 (exp.f64 (*.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) |
(fabs.f64 (-.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(fabs.f64 (neg.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))))) |
(fabs.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))) |
(fabs.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) |
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(exp.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (/.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (/.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
#s(literal 1 binary64) |
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) |
(*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) |
(*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (-.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) (-.f64 (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))))))) |
(/.f64 (neg.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (neg.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) |
#s(literal 2 binary64) |
(*.f64 (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.im))) (neg.f64 (neg.f64 (fabs.f64 x.im)))) |
(*.f64 (neg.f64 (neg.f64 (neg.f64 x.im))) (neg.f64 (neg.f64 (neg.f64 x.im)))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im)) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im)) |
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im))) |
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im) |
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) |
(pow.f64 x.im #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.im) x.im)) |
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) |
(fabs.f64 (*.f64 (neg.f64 x.im) x.im)) |
(fabs.f64 (*.f64 x.im x.im)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.re))) (neg.f64 (neg.f64 (fabs.f64 x.re)))) |
(*.f64 (neg.f64 (neg.f64 (neg.f64 x.re))) (neg.f64 (neg.f64 (neg.f64 x.re)))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re)) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re)) |
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re) |
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re)) |
(*.f64 (neg.f64 x.re) (neg.f64 x.re)) |
(*.f64 x.re x.re) |
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) x.re)) |
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.re) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.re) x.re)) |
(sqrt.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) |
(fabs.f64 (*.f64 (neg.f64 x.re) x.re)) |
(fabs.f64 (*.f64 x.re x.re)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) |
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64)) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.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.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(sqrt.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(fabs.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 (pow.f64 (exp.f64 y.re) (/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.re) (/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re #s(literal 1/2 binary64)) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 y.re #s(literal 1/2 binary64))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 y.re #s(literal 1/2 binary64)))) |
(pow.f64 (exp.f64 y.re) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (+.f64 (pow.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(sqrt.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) |
(fabs.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) |
(fabs.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 y.re)) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 y.re #s(literal 1/2 binary64)))) |
(exp.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) |
(*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))))) |
(/.f64 (+.f64 (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))) |
(neg.f64 (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))) |
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))) |
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) |
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) |
(cos.f64 (neg.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(cos.f64 (fabs.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(cos.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) |
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
#s(literal -1 binary64) |
(*.f64 (pow.f64 (neg.f64 x.re) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.re) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))) |
(*.f64 (/.f64 #s(literal 1 binary64) x.re) #s(literal -1 binary64)) |
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) x.re)) |
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) x.re)) |
(pow.f64 (neg.f64 x.re) #s(literal -1 binary64)) |
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 x.re)))) |
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) x.re)) |
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 x.re))) |
(/.f64 #s(literal -1 binary64) x.re) |
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 x.re))) |
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (neg.f64 x.re)))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 x.re #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (neg.f64 x.re)) |
(neg.f64 (/.f64 #s(literal 1 binary64) x.re)) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal -1 binary64))) |
(+.f64 (/.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 0 binary64) (neg.f64 x.re))) |
(*.f64 #s(literal -1 binary64) (log.f64 (neg.f64 x.re))) |
(neg.f64 (log.f64 (neg.f64 x.re))) |
(-.f64 (log.f64 #s(literal 1 binary64)) (log.f64 (neg.f64 x.re))) |
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (neg.f64 (neg.f64 x.re)))) |
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) |
(+.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (log.f64 #s(literal -1 binary64))) |
(+.f64 (log.f64 #s(literal 1 binary64)) (neg.f64 (log.f64 (neg.f64 x.re)))) |
(+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
(log.f64 (/.f64 #s(literal -1 binary64) x.re)) |
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) |
(*.f64 y.re (neg.f64 (log.f64 (neg.f64 x.re)))) |
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) |
(*.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 (neg.f64 x.re)))) y.re) |
(*.f64 (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re)))) y.re) |
(*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) |
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (log.f64 (exp.f64 #s(literal -1 binary64)))) |
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal -1 binary64)) |
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) (log.f64 (exp.f64 (neg.f64 y.re)))) |
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) (neg.f64 y.re)) |
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) |
(*.f64 y.re (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal -1 binary64))) |
(*.f64 y.re (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re))))) |
(neg.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) |
(-.f64 (log.f64 #s(literal 1 binary64)) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) |
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) |
(*.f64 (pow.f64 (exp.f64 (neg.f64 y.re)) (/.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal 2 binary64))) (pow.f64 (exp.f64 (neg.f64 y.re)) (/.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (/.f64 (neg.f64 y.re) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (/.f64 (neg.f64 y.re) #s(literal 2 binary64)))) |
(*.f64 (sqrt.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (sqrt.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) |
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) x.re) (neg.f64 y.re)) (pow.f64 #s(literal -1 binary64) (neg.f64 y.re))) |
(*.f64 (pow.f64 #s(literal -1 binary64) (neg.f64 y.re)) (pow.f64 (/.f64 #s(literal 1 binary64) x.re) (neg.f64 y.re))) |
(*.f64 (pow.f64 #s(literal 1 binary64) (neg.f64 y.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) |
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (/.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (/.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 2 binary64)))) |
(pow.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 (neg.f64 x.re))))) y.re) |
(pow.f64 (exp.f64 (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re))))) y.re) |
(pow.f64 (exp.f64 (neg.f64 (log.f64 (neg.f64 x.re)))) (neg.f64 y.re)) |
(pow.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) #s(literal -2 binary64)) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal -1 binary64))) |
(pow.f64 (exp.f64 y.re) (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re))))) |
(pow.f64 (exp.f64 (neg.f64 y.re)) (neg.f64 (log.f64 (neg.f64 x.re)))) |
(pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) #s(literal -1 binary64)) |
(pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) |
(pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)) |
(/.f64 (-.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (-.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) |
(/.f64 (+.f64 (pow.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) #s(literal 3 binary64)) (pow.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (-.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))))) |
(/.f64 (-.f64 (pow.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 (*.f64 (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))) (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))))))) |
(/.f64 (-.f64 (pow.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))))) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 #s(literal 2 binary64) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) |
(/.f64 (+.f64 (pow.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (-.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 (neg.f64 y.re)) (log.f64 (neg.f64 x.re)))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) |
(-.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))) |
(-.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) |
(sqrt.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) #s(literal -2 binary64))) |
(fabs.f64 (-.f64 (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) |
(fabs.f64 (-.f64 (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) |
(fabs.f64 (neg.f64 (neg.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) |
(fabs.f64 (neg.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) |
(fabs.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) |
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 (neg.f64 y.re))) (neg.f64 (log.f64 (neg.f64 x.re))))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) |
(exp.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) |
(+.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) |
(+.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) |
(+.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)) (/.f64 #s(literal 0 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) |
(*.f64 #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 #s(literal -1 binary64) y.re) |
(*.f64 y.re #s(literal -1 binary64)) |
(neg.f64 y.re) |
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re) |
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) |
(*.f64 (atan2.f64 x.im x.re) (neg.f64 y.re)) |
(*.f64 y.re (neg.f64 (atan2.f64 x.im x.re))) |
(neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) |
(PI.f64) |
#s(literal 1/2 binary64) |
(*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 1 binary64))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (PI.f64))) |
(*.f64 (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (PI.f64)))) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
(*.f64 (PI.f64) #s(literal 1/2 binary64)) |
(/.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64)) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) |
(log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))) |
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))) |
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))))) |
(/.f64 (+.f64 (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))) |
(neg.f64 (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))) |
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))) |
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) |
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) |
(cos.f64 (neg.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(cos.f64 (fabs.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(cos.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) |
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) |
(*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (-.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))))) |
(/.f64 (neg.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (neg.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) |
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) |
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im)) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(neg.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)) |
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))) |
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (-.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))))) |
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) |
(neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal -1 binary64))) |
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) |
Compiled 109 101 to 6 767 computations (93.8% saved)
32 alts after pruning (32 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 336 | 20 | 1 356 |
| Fresh | 6 | 12 | 18 |
| Picked | 5 | 0 | 5 |
| Done | 0 | 0 | 0 |
| Total | 1 347 | 32 | 1 379 |
| Status | Accuracy | Program |
|---|---|---|
| 27.5% | (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) | |
| 37.4% | (*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) | |
| 23.9% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| ▶ | 57.6% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| 42.4% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) | |
| 18.7% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 43.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) | |
| 36.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.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)))) | |
| 32.9% | (*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 37.6% | (*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 28.2% | (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) | |
| 28.2% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))))))) | |
| ▶ | 29.6% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
| 17.0% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 25.5% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.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)))) | |
| 26.7% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 23.1% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 55.3% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) | |
| 56.4% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) | |
| 55.3% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) | |
| ▶ | 51.7% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| 50.1% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 30.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) | |
| 30.1% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) | |
| ▶ | 48.6% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
| 51.3% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) | |
| 43.1% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re))))) | |
| ▶ | 15.6% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
| 47.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) | |
| 44.8% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) | |
| 21.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) | |
| 30.7% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
Compiled 4 104 to 2 136 computations (48.0% saved)
| Inputs |
|---|
1 |
1/2 |
-1 |
(PI) |
(* (PI) 1/2) |
2 |
-1/2 |
(* -1/2 (PI)) |
| Outputs |
|---|
#s(literal 1 binary64) |
#s(literal 1/2 binary64) |
#s(literal -1 binary64) |
#s(literal 884279719003555/281474976710656 binary64) |
#s(literal 884279719003555/562949953421312 binary64) |
#s(literal 2 binary64) |
#s(literal -1/2 binary64) |
#s(literal -884279719003555/562949953421312 binary64) |
| 0.0ms | 1× | 0 | valid |
Compiled 14 to 10 computations (28.6% saved)
adjust: 0.0ms (0.0% of total)Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 3778 | 54964 |
| 1× | iter-limit |
| Inputs |
|---|
x.re |
(*.f64 x.re x.re) |
x.im |
(*.f64 x.im x.im) |
(*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) |
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) |
y.re |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) |
(atan2.f64 x.im x.re) |
y.im |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
#s(literal 1 binary64) |
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
#s(literal 1/2 binary64) |
(*.f64 y.re #s(literal 1/2 binary64)) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(literal -1 binary64) |
(/.f64 #s(literal -1 binary64) x.re) |
(log.f64 (/.f64 #s(literal -1 binary64) x.re)) |
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
(neg.f64 y.re) |
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) |
(PI.f64) |
(*.f64 (PI.f64) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
#s(literal 2 binary64) |
(pow.f64 x.im #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re) |
(*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(literal -1/2 binary64) |
(*.f64 #s(literal -1/2 binary64) (PI.f64)) |
(-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) |
(sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
| Outputs |
|---|
#s(approx x.re x.re) |
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) |
#s(approx (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))))))))) |
#s(approx (atan2 x.im x.re) (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 (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))))))))))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (/ -1 x.re) (/.f64 #s(literal -1 binary64) x.re)) |
#s(approx (log (/ -1 x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (neg.f64 x.re)))) |
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 x.re))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re)))) |
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (neg.f64 x.re))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))))))))) |
#s(approx (* (neg y.re) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (+ (* x.im x.im) (* x.re x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (/ -1 x.re)) (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.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 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (/ -1 x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) |
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.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 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx x.im x.im) |
#s(approx (* (* x.im x.im) (* x.im x.im)) (pow.f64 x.im #s(literal 4 binary64))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.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 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) 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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 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 (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.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 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) 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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx y.re y.re) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) |
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (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 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* y.re 1/2) (*.f64 #s(literal 1/2 binary64) y.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y.re (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 y.re (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))))) |
#s(approx (neg y.re) (*.f64 #s(literal -1 binary64) y.re)) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/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))))))))) |
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (+.f64 (*.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/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (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))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re)))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re))))) |
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)) (atan2.f64 x.im x.re)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (*.f64 y.re (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (/.f64 #s(literal 1 binary64) y.re))))) |
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re)) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)))))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx y.im y.im) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))))))) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) y.im)) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
12 calls:
| Time | Variable | Point |
|---|---|---|
| 47.0ms | y.re | 0 |
| 37.0ms | x.im | inf |
| 30.0ms | y.im | inf |
| 26.0ms | y.im | 0 |
| 25.0ms | x.re | -inf |
Useful iterations: 2 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 90 | 859 |
| 0 | 136 | 808 |
| 1 | 512 | 756 |
| 2 | 1987 | 752 |
| 0 | 4085 | 752 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
x.re |
(*.f64 x.re x.re) |
x.im |
(*.f64 x.im x.im) |
(*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) |
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) |
y.re |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) |
(atan2.f64 x.im x.re) |
y.im |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
#s(literal 1 binary64) |
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
#s(literal 1/2 binary64) |
(*.f64 y.re #s(literal 1/2 binary64)) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(literal -1 binary64) |
(/.f64 #s(literal -1 binary64) x.re) |
(log.f64 (/.f64 #s(literal -1 binary64) x.re)) |
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
(neg.f64 y.re) |
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) |
(PI.f64) |
(*.f64 (PI.f64) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
#s(literal 2 binary64) |
(pow.f64 x.im #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re) |
(*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(literal -1/2 binary64) |
(*.f64 #s(literal -1/2 binary64) (PI.f64)) |
(-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) |
(sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
| Outputs |
|---|
x.re |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re)) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re)) |
(*.f64 (fabs.f64 (fabs.f64 x.re)) (fabs.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re) |
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re)) |
(*.f64 (neg.f64 x.re) (neg.f64 x.re)) |
(*.f64 x.re x.re) |
(pow.f64 (fabs.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) x.re)) |
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.re) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.re) x.re)) |
(fabs.f64 (*.f64 x.re x.re)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) |
x.im |
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im))) (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)))) |
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im))) |
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im))) (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)))) |
(*.f64 (sqrt.f64 (*.f64 x.im (fabs.f64 x.im))) (sqrt.f64 (*.f64 x.im (fabs.f64 x.im)))) |
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (fabs.f64 x.im))) |
(*.f64 (sqrt.f64 (fabs.f64 x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)))) |
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (neg.f64 x.im))) |
(*.f64 (sqrt.f64 (neg.f64 x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im)) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im)) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im))) |
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im))) |
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im))) |
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) x.im))) |
(*.f64 (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im)) (sqrt.f64 x.im)) |
(*.f64 (sqrt.f64 x.im) (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 1/2 binary64)) |
(pow.f64 x.im #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal -1/2 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.im) x.im)) |
(sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) |
(fabs.f64 (*.f64 (neg.f64 x.im) x.im)) |
(fabs.f64 (*.f64 x.im x.im)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1 binary64)) (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1 binary64)) (*.f64 (neg.f64 x.im) x.im)) |
(*.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) (fabs.f64 x.im)) |
(*.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) (neg.f64 x.im)) |
(*.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) (*.f64 (fabs.f64 x.im) (neg.f64 x.im))) |
(*.f64 (*.f64 (fabs.f64 x.im) x.im) (*.f64 (fabs.f64 x.im) x.im)) |
(*.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) (*.f64 (neg.f64 x.im) (fabs.f64 x.im))) |
(*.f64 (*.f64 x.im (fabs.f64 x.im)) (*.f64 x.im (fabs.f64 x.im))) |
(*.f64 (pow.f64 (*.f64 x.im x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 x.im x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) (*.f64 x.im x.im)) |
(*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) |
(*.f64 (fabs.f64 x.im) (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))) |
(*.f64 (neg.f64 x.im) (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))) |
(*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) |
(*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 0 binary64))) |
(*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) |
(*.f64 x.im (*.f64 (*.f64 x.im x.im) x.im)) |
(pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1/2 binary64)) |
(pow.f64 (fabs.f64 x.im) #s(literal 4 binary64)) |
(pow.f64 (neg.f64 x.im) #s(literal 4 binary64)) |
(pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 1 binary64)) |
(pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) |
(pow.f64 x.im #s(literal 4 binary64)) |
(/.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal -1/2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) |
(neg.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.im) x.im))) |
(neg.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.im x.im))) |
(sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))) |
(fabs.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (neg.f64 x.im) x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1 binary64))) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 4 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 x.im x.im)) #s(literal 2 binary64))) |
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im))) (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)))) |
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im))) |
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im))) (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)))) |
(*.f64 (sqrt.f64 (*.f64 x.im (fabs.f64 x.im))) (sqrt.f64 (*.f64 x.im (fabs.f64 x.im)))) |
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (fabs.f64 x.im))) |
(*.f64 (sqrt.f64 (fabs.f64 x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)))) |
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (neg.f64 x.im))) |
(*.f64 (sqrt.f64 (neg.f64 x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im)) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im)) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im))) |
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im))) |
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im))) |
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) x.im))) |
(*.f64 (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im)) (sqrt.f64 x.im)) |
(*.f64 (sqrt.f64 x.im) (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 1/2 binary64)) |
(pow.f64 x.im #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal -1/2 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.im) x.im)) |
(sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) |
(fabs.f64 (*.f64 (neg.f64 x.im) x.im)) |
(fabs.f64 (*.f64 x.im x.im)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.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.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64)))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1/2 binary64))) |
(-.f64 (cosh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(-.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64)))) |
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(+.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(neg.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
y.re |
(*.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) |
(*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) (log.f64 (exp.f64 y.re))) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.re) |
(*.f64 y.re (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(atan2.f64 x.im x.re) |
y.im |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))) |
(-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)) |
(-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) |
(+.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) |
(*.f64 (sqrt.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) (sqrt.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
(pow.f64 (exp.f64 (*.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -1 binary64)) |
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))))) |
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))) |
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))))) |
(-.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))))) |
(sqrt.f64 (exp.f64 (*.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) |
(fabs.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))) |
(fabs.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) |
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(literal 1 binary64) |
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) |
(*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) |
(/.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.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.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal 1/2 binary64) y.re) |
(*.f64 y.re #s(literal 1/2 binary64)) |
(/.f64 (neg.f64 y.re) #s(literal -2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) y.re)) |
(/.f64 y.re #s(literal 2 binary64)) |
(neg.f64 (*.f64 #s(literal -1/2 binary64) y.re)) |
(neg.f64 (*.f64 y.re #s(literal -1/2 binary64))) |
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64)))) |
(pow.f64 (exp.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) y.re)) |
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) |
(pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.re) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64)))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal -1/2 binary64) y.re))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal -1/2 binary64)))) |
(fabs.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) |
(+.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) |
(*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))) |
(neg.f64 (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))) |
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))) |
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) |
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (neg.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (fabs.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (fabs.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) |
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
#s(literal -1 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) x.re) #s(literal -1 binary64)) |
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) x.re)) |
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) x.re)) |
(pow.f64 (neg.f64 x.re) #s(literal -1 binary64)) |
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 x.re))) |
(/.f64 #s(literal -1 binary64) x.re) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 x.re #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (neg.f64 x.re)) |
(neg.f64 (/.f64 #s(literal 1 binary64) x.re)) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal -1 binary64))) |
(*.f64 #s(literal -1 binary64) (log.f64 (neg.f64 x.re))) |
(neg.f64 (log.f64 (neg.f64 x.re))) |
(-.f64 (log.f64 #s(literal 1 binary64)) (log.f64 (neg.f64 x.re))) |
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (neg.f64 (neg.f64 x.re)))) |
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) |
(+.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (log.f64 #s(literal -1 binary64))) |
(+.f64 (log.f64 #s(literal 1 binary64)) (neg.f64 (log.f64 (neg.f64 x.re)))) |
(+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
(log.f64 (/.f64 #s(literal -1 binary64) x.re)) |
(*.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 (neg.f64 x.re)))) y.re) |
(*.f64 (*.f64 #s(literal 1 binary64) y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) |
(*.f64 (neg.f64 (neg.f64 y.re)) (neg.f64 (log.f64 (neg.f64 x.re)))) |
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 1 binary64)) |
(*.f64 (neg.f64 y.re) (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re))))) |
(*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal -1 binary64)) |
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) |
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) |
(*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) |
(*.f64 y.re (neg.f64 (log.f64 (neg.f64 x.re)))) |
(neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) |
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (*.f64 #s(literal 1 binary64) y.re))) |
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 (neg.f64 y.re)))) |
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) |
(*.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 (neg.f64 x.re)))) y.re) |
(*.f64 (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re)))) y.re) |
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (log.f64 (exp.f64 #s(literal -1 binary64)))) |
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal -1 binary64)) |
(*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) |
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) (log.f64 (exp.f64 (neg.f64 y.re)))) |
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) (neg.f64 y.re)) |
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) |
(*.f64 y.re (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal -1 binary64))) |
(*.f64 y.re (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re))))) |
(neg.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) |
(-.f64 (log.f64 #s(literal 1 binary64)) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) |
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 1 binary64))) #s(literal 1 binary64)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 1 binary64))) #s(literal 1 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 1 binary64))) |
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 1 binary64))))) |
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) |
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))))) |
(neg.f64 (+.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal -1 binary64))) |
(neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 1 binary64))) |
(-.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal -1 binary64)) |
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) |
(+.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 1 binary64)) |
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) |
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) |
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) |
(*.f64 #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 #s(literal -1 binary64) y.re) |
(*.f64 y.re #s(literal -1 binary64)) |
(neg.f64 y.re) |
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re) |
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) |
(*.f64 (atan2.f64 x.im x.re) (neg.f64 y.re)) |
(*.f64 y.re (neg.f64 (atan2.f64 x.im x.re))) |
(neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) |
(PI.f64) |
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (PI.f64))) |
(*.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64)) |
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) |
(*.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64))) |
(*.f64 (PI.f64) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (PI.f64)))) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64)) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) |
(neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) |
(log.f64 (pow.f64 (exp.f64 (neg.f64 (PI.f64))) #s(literal -1/2 binary64))) |
(log.f64 (exp.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))) |
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))) |
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) |
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))) |
(neg.f64 (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))) |
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))) |
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) |
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (neg.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (fabs.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) |
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(cos.f64 (fabs.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(cos.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) |
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) |
#s(literal 2 binary64) |
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im))) (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)))) |
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im))) |
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im))) (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)))) |
(*.f64 (sqrt.f64 (*.f64 x.im (fabs.f64 x.im))) (sqrt.f64 (*.f64 x.im (fabs.f64 x.im)))) |
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (fabs.f64 x.im))) |
(*.f64 (sqrt.f64 (fabs.f64 x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)))) |
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (neg.f64 x.im))) |
(*.f64 (sqrt.f64 (neg.f64 x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im)) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im)) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im))) |
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im))) |
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im))) |
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) x.im))) |
(*.f64 (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im)) (sqrt.f64 x.im)) |
(*.f64 (sqrt.f64 x.im) (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im) |
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 x.im #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 1/2 binary64)) |
(pow.f64 x.im #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64))) |
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal -1/2 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.im) x.im)) |
(sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) |
(fabs.f64 (*.f64 (neg.f64 x.im) x.im)) |
(fabs.f64 (*.f64 x.im x.im)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re)) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re)) |
(*.f64 (fabs.f64 (fabs.f64 x.re)) (fabs.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re))) |
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64))) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re) |
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re)) |
(*.f64 (neg.f64 x.re) (neg.f64 x.re)) |
(*.f64 x.re x.re) |
(pow.f64 (fabs.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64)) |
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64))) |
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) x.re)) |
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.re) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) |
(neg.f64 (*.f64 (neg.f64 x.re) x.re)) |
(fabs.f64 (*.f64 x.re x.re)) |
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) |
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) |
(neg.f64 (-.f64 (*.f64 (neg.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.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64)))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1/2 binary64))) |
(-.f64 (cosh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(-.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64)))) |
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(+.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))) |
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64)))) |
(pow.f64 (exp.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) y.re)) |
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) |
(pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) |
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.re) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64)))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal -1/2 binary64) y.re))) |
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal -1/2 binary64)))) |
(fabs.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) |
(+.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))) |
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) |
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(neg.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) |
(*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) |
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.im)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im)) |
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.im) |
(*.f64 y.im (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) |
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.im))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(neg.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
#s(literal -1/2 binary64) |
(*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (PI.f64))) |
(*.f64 (neg.f64 (PI.f64)) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal -1/2 binary64))) |
(*.f64 #s(literal -1/2 binary64) (log.f64 (exp.f64 (PI.f64)))) |
(*.f64 #s(literal -1/2 binary64) (PI.f64)) |
(*.f64 (PI.f64) #s(literal -1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (neg.f64 (PI.f64))) |
(neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(log.f64 (pow.f64 (exp.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))) |
(log.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (PI.f64)) #s(literal 2 binary64)) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
(neg.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(+.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (sin.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) |
(neg.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (PI.f64))) |
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))) |
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(-.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(cos.f64 (+.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(cos.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal -1 binary64))) |
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) |
Compiled 121 027 to 9 620 computations (92.1% saved)
40 alts after pruning (39 fresh and 1 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 294 | 22 | 1 316 |
| Fresh | 10 | 17 | 27 |
| Picked | 5 | 0 | 5 |
| Done | -1 | 1 | 0 |
| Total | 1 308 | 40 | 1 348 |
| Status | Accuracy | Program |
|---|---|---|
| 27.5% | (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) | |
| 37.4% | (*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) | |
| 23.9% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 42.4% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) | |
| 18.7% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 43.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) | |
| 36.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.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)))) | |
| 32.9% | (*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 37.6% | (*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 28.2% | (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) | |
| 29.6% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) | |
| 26.2% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (sin.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) | |
| 25.4% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) | |
| 17.0% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 25.5% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.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)))) | |
| 26.7% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 55.3% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) | |
| 56.4% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) | |
| 55.3% | (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) | |
| 31.8% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) | |
| 38.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) | |
| 27.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) | |
| 36.9% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) | |
| 50.1% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) | |
| ✓ | 51.7% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| 48.9% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) | |
| 44.8% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) | |
| 30.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) | |
| 15.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) | |
| 15.6% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) | |
| 41.7% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) y.re))) | |
| 43.1% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re))))) | |
| 18.8% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))))) | |
| 29.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))) | |
| 15.6% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re))))))))) | |
| 15.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re)))))))) | |
| 21.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) | |
| 30.7% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) | |
| 47.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) | |
| 46.2% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
Compiled 2 685 to 1 468 computations (45.3% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) |
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (cos.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))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
(*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.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 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.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 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.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 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) 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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) |
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.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 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) 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))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) 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))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (sin.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 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))) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) |
16 calls:
| 27.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))) (cos.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)))) |
| 25.0ms | x.im |
| 25.0ms | x.re |
| 22.0ms | y.re |
| 22.0ms | y.im |
| Accuracy | Segments | Branch |
|---|---|---|
| 51.7% | 1 | x.re |
| 51.7% | 1 | y.im |
| 51.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))) (cos.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)))) |
| 51.7% | 1 | x.im |
| 51.7% | 1 | y.re |
| 77.9% | 3 | y.re |
| 60.5% | 2 | x.re |
| 78.3% | 3 | y.re |
| 79.5% | 3 | y.re |
| 80.0% | 3 | y.re |
| 80.4% | 3 | y.re |
| 72.5% | 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))) (cos.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)))) |
| 78.5% | 3 | x.re |
| 74.6% | 2 | x.im |
| 80.8% | 3 | y.re |
| 64.7% | 2 | y.im |
Compiled 5 237 to 622 computations (88.1% saved)
| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 39.0ms | 1.058821357223138e-57 | 4.372430616025792e-48 |
| 25.0ms | -513321609519.3449 | -40335450688.94975 |
| 28.0ms | 161× | 0 | valid |
| 24.0ms | 79× | 1 | valid |
Compiled 1 498 to 896 computations (40.2% saved)
ival-hypot: 10.0ms (24.8% of total)ival-cos: 9.0ms (22.3% of total)ival-mult!: 7.0ms (17.3% of total)ival-log: 6.0ms (14.9% of total)adjust: 3.0ms (7.4% of total)ival-atan2: 3.0ms (7.4% of total)ival-exp: 2.0ms (5.0% of total)ival-add!: 1.0ms (2.5% of total)ival-sub!: 1.0ms (2.5% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 2.0ms | 1.058821357223138e-57 | 4.372430616025792e-48 |
| 32.0ms | -8.036026291912184e+20 | -2774581400436465700.0 |
| 13.0ms | 44× | 1 | valid |
| 9.0ms | 84× | 0 | valid |
Compiled 1 810 to 1 058 computations (41.5% saved)
ival-mult!: 4.0ms (23.1% of total)ival-hypot: 3.0ms (17.4% of total)ival-log: 3.0ms (17.4% of total)adjust: 2.0ms (11.6% of total)ival-atan2: 2.0ms (11.6% of total)ival-cos: 2.0ms (11.6% of total)ival-exp: 1.0ms (5.8% of total)ival-add!: 0.0ms (0.0% of total)ival-sub!: 0.0ms (0.0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 2.0ms | 1.058821357223138e-57 | 4.372430616025792e-48 |
| 12.0ms | -8.036026291912184e+20 | -2774581400436465700.0 |
Compiled 1 746 to 1 042 computations (40.3% saved)
| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 2.0ms | 1.058821357223138e-57 | 4.372430616025792e-48 |
| 36.0ms | -2.2928499974992032e-10 | -4.963981993589074e-22 |
| 15.0ms | 50× | 1 | valid |
| 14.0ms | 110× | 0 | valid |
Compiled 1 940 to 1 182 computations (39.1% saved)
ival-hypot: 4.0ms (19.2% of total)ival-mult!: 4.0ms (19.2% of total)ival-log: 4.0ms (19.2% of total)ival-cos: 3.0ms (14.4% of total)adjust: 2.0ms (9.6% of total)ival-atan2: 2.0ms (9.6% of total)ival-exp: 1.0ms (4.8% of total)ival-add!: 0.0ms (0.0% of total)ival-sub!: 0.0ms (0.0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 51.0ms | 2.980528542262674e-46 | 8.289285848586678e-17 |
| 29.0ms | -2.2928499974992032e-10 | -4.963981993589074e-22 |
| 43.0ms | 106× | 1 | valid |
| 23.0ms | 198× | 0 | valid |
Compiled 2 372 to 1 315 computations (44.6% saved)
adjust: 14.0ms (25.3% of total)ival-log: 11.0ms (19.9% of total)ival-mult!: 9.0ms (16.3% of total)ival-hypot: 8.0ms (14.5% of total)ival-cos: 6.0ms (10.8% of total)ival-atan2: 4.0ms (7.2% of total)ival-exp: 3.0ms (5.4% of total)ival-add!: 1.0ms (1.8% of total)ival-sub!: 1.0ms (1.8% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 2.0ms | 2.980528542262674e-46 | 8.289285848586678e-17 |
| 2.0ms | -2.2928499974992032e-10 | -4.963981993589074e-22 |
Compiled 2 392 to 1 325 computations (44.6% saved)
| 1× | fuel |
Compiled 1 038 to 99 computations (90.5% saved)
Compiled 1 075 to 118 computations (89.0% saved)
Loading profile data...